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Introducao 


Este livro e seu guia para o computador Apple II. Ele descreve o Apple II e cobre os perifericos 
mais comuns e acessorios, inclulndo drives de disco e impressoras. 

Assumimos que voce tenha acesso a um sistema com o Apple II completamente instalado 
de acordo com as instrucoes do manual do proprietario que vem junto com o equipamento. Ele 
nao explica como instalar o sistema, mas como usa-lo apos a instalagao. 

0 que e um Apple II? Como se faz para que ele funcione? Os primeiros dois capftulos res- 
pondem a esta questao. Voce provavelmente ja deve saber que o APPLE II e feito a partirde muitas 
partes colocadas juntas com fios e cabos. 0 primeiro capftulo diz o que e cada pega e para que 
serve. 0 segundo capftulo diz como operar cada parte do equipamento. Com esse conhecimento 
voce estara pronto para utilizar qualquer um dos pacotes de software prontos-para-uso, extensa- 
mente disponfveis para processamento de palavra, analise financeira, contabilidade domestica, 
instrugao programada por computador e entretenimento. 

Os quatro capftulos seguintes informam como executar seus proprios programas em BASIC 
no Apple II. 0 terceiro capftulo inicia com um arranjo tutorial de ambas as versoes de BASIC 
disponfveis para o Apple II, Integer BASIC e Applesoft. 0 quarto capftulo continua o BASIC com 
abordagem de topicos mais avancados de programagao e outras propriedades do BASIC. Dois dos 
topicos avangados, o drive de disco e os graficos em vfdeo sao bastante importantes e a eles foram 
destinados capftulos especiais. 0 quinto capftulo explica como usar o drive de disco para guardar 
arquivos de dados e programas. 0 sexto capftulo ensina como programar graficos usando o vfdeo 
display pelas duas formas graficas disponfveis no Apple II. 

Os programas em BASIC operam no Apple II sob a supervisao de seu Monitor. 0 setimo 
capftulo explica tanto o Monitor standard como o Autostart sob o ponto de vista da programagao 
BASIC. 0 capftulo tambem fornece informagao de como incorporar rotinas em linguagem assem¬ 
bler dentro do programa em BASIC. 

0 oitavo capftulo contem uma descrigao completa de cada comando e fungao disponfveis 
em ambas as versoes do BASIC, incluindo comandos de disco. Juntamente com os apendices, ele 
funciona como uma referenda imediata, uma vez que ja se saiba programar em BASIC no Apple II. 
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Apresentando o Apple II 


A Figura 1.1 mostra a configuragao tipica de um sistema de computador com o Apple II. Veja que 
o sistema e composto de varias partes separadas que compoem o equipamento. 

Seu sistema particular pode nao ser exatamente o que esta mostrado na figura. Muitos com- 
ponentes vem de uma grande lista de dispositivos opcionais. Porem existem tres elementos que 
todos os sistema tern em comum: o proprio Apple 11, o teclado conjugado e o televisor. Vamos dar 
uma olhada em cada um deles e nos dispositivos opcionais mais comuns. Nao vamos ensinar como 
ligar esses componentes no Apple II. Para as instrugoes sobre instalagao completa, veja os manuais 
de usuSrio fornecidos com cada componente. 



FIGURA 1.1. Um Sistema de Computagao Ti'pico do Apple II. 
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TECLADO E TV 

0 teclado e a tela de TV tornam a comunicagao com o Apple II possfvel. Um teclado padrao do 
tipo de maquina de escrever vem com o Apple II. Ele transfere as instrucoes tecladas para dentro 
do computador. 

A tela de TV pode ser tanto uma televisao colorida comum quanto um monitor em cores. 
Uma TV em preto e branco tambem funciona, mas e claro que a informagao no video se torna 
mais pobre do que em cores. A tela nao apenas repete aquilo que e teclado de forma a se poder 
conferir, ela tambem mostra a reagao do Apple II aos comandos teclados. 

A tela de TV padrao tern tres modos diferentes de operagao. Um para caracteres de texto 
em branco e preto e os outros dois sao dedicados a graficos. No modo texto, a tela e dividida em 
24 linhas com 40 caracteres cada uma. Os modos graficos operam com linhas e pontos e nao mais 
caracteres, e subdividem a tela em elementos menores (os graficos sao discutidos em detalhes 
no Capi'tulo 7). 

Muitos proprietaries de Apple II usam aparelhos de televisao para display, ou porque ja 
possufam um ou porque tern uma boa desculpa para comprar. Um monitor de TV produz imagens 
mais precisas do que um TV normal, mas nao pode ser usado como televisor. A Figura 1.2 mostra 
a conexao com um televisor normal. 

Como se pode ver, o TV nao se conecta direto com o Apple II. Existe um dispositivo de 
conexao do sistema a antena do televisor. Existe uma chave que estando numa posigao deixa o 
televisor operar de forma comum e em outra faz com que ele sirva de monitor para o Apple II. 
Um cabo vai do aparelho ate um circuito colocado dentro do Apple II. 0 dispositivo em questao 
e chamado modutador de RF e serve para converter o sinal de vi'deo gerado pelo Apple II em algo 



FIGURA 1.2. Conexao a um Televisor Comum. 
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FIGURA 1.3. Conexao a um Monitor de Televisao. 


que o televisor entende como imagem. Seu vendedor de Apple II pode Ihe vender um modulador 
de RF e mostrar-lhe como fazer as conexoes. 

Um monitor de televisao nao requer o modulador de RF; ele se conecta diretamente com o 
Apple 11, como e mostrado na Figura 1.3. 


DENTRO DO APPLE II 

0 Apple II guarda em si a parte que controla o resto do sistema — sob sua supervisao, naturalmen- 
te! Logo atras do teclado esta o banco principal de memorias, o microprocessador, os pontos de 
conexao de todos os componentes acessorios, e muito mais. A Figura 1.4 fornece a identificacao 
de todos esses itens. 

A parte interna de seu computador pode ser um pouco diferente do que e mostrado na 
Figura 1.4. 0 layout basico sera o mesmo — a placa maior de circuito impresso com muitos cir- 
cuitos integrados, as pastilhas pretas colocadas em fileiras ordenadas, e ainda algumas pequenas 
placas montadas verticalmente nos espacos disponfveis na parte traseira da placa maior. 0 numero 
de circuitos integrados e o numero de placas verticals pode variar de um sistema para outro. 


MEMORIA 

A memoria do computador e medida em unidade chamada byte. Um byte de memoria pode guar- 
dar um caractere ou uma quantidade semelhante de dados. Dependendo do numero de circuitos 
integrados, seu Apple II pode ter de 4 096 a 65 536 bytes de memoria. Isso e normalmente cha- 
mado de 4K a 64K, onde K representa 1 024 bytes. A quantidade de memoria indica o que o 
computador pode fazer, como veremos mais tarde. 
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0 Apple II tem dois tipos de memoria. Uma e a memoria que so permite ser lida ( Read-Only 
Memory ou simplesmente ROM); seu conteudo nunca muda, mesmo se a tomada for desligada. 
A ROM contem os programas que dao ao Apple II identidade unica e permitem que ele responda 
aos comandos que sao digitados no teclado. 0 outro tipo de memoria, de escrita e leitura (chamada 
de Randon-Access Memory ou simplesmente RAM) contem dados que podem ser alterados. Os pro¬ 
gramas em RAM determinam que tarefa especi'fica seu computador esta executando. 

A memoria de leitura e escrita mantem os dados enquanto a tomada estiver ligada. Quando 
se desliga o Apple II a informacao contida na RAM e destrufda. 


GRAVADOR CASSETTE 

Felizmente pode-se usar urn gravador cassette convencional para guardar programas da RAM e 
le-los depois, de forma que se tenha uma biblioteca de programas em fita cassette. A Figura 1.4 
mostra uma instalacao com gravador de fita cassette tfpica. 


DRIVE DE DISCO 

0 drive de disco e muito melhor que o gravador para guardar dados e programas. Ele e mais confia- 
vel, tem maior capacidade de armazenamento e opera mais rapidamente. Alem disso, o drive de 
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FIGURA 1.5. Conexao a um Gravador Cassette. 


disco guarda f3cil e rapidamente dados tais como nomes e enderegoS para uma relagao de mala 
direta ou correspondence para um processador de palavra. Os drives de disco existem em varios 
tamanhos e formas; diferentes modelos permitem diferentes capacidades de armazenamento. 
A Figura 1.6 mostra duas unidades do Disk II (produto da Apple Computer Inc.). 


PROGRAMAS 

Deixemos um pouco de lado a apresentacao do equipamento e vamos dar uma olhada nos dife¬ 
rentes tipos de programas que podem ser usados com o sistema. Nao estamos falando dos dife¬ 
rentes tipos de coisas que se pode fazer com o Apple II, mas sobre as diferentes classes de pro¬ 
gramas que podem coexistir para que o Apple II execute as tarefas. Os programas que fazem 
coisas como jogos, escrever cartas etc., sao chamados programas aplicativos. Eles sempre sao colo- 
cados em memoria de leitura e escrita (RAM), e nao em ROM. Voce os transfere para a RAM a 
partir do gravador ou do disco. Assim, quando voce quer que seu Apple II seja um processador de 
palavra, deve usar um disco que tenha o programa aplicativo de processamento de palavra e trans- 
fira o programa para a RAM. 0 Capftulo 2 explica como fazer isso. 

Muito freqiientemente, os programadores escrevem aplicativos numa linguagem de progra- 
macao que Ihes e mais facil, porem a linguagem e muito avangada para que o Apple II entenda 
sem alguma ajuda. Um programa especial chamado interpretador faz exatamente o que o nome 
diz. Ele converte o programa aplicativo da linguagem em que ele foi escrito para a linguagem que 
o computador consegue entender. 0 Apple II tern um conjunto de diferentes interpretadores, que 
podem residir tanto em RAM quanto em ROM. 

0 interpretador utiliza, por sua vez, um outro programa que coordena os componentes do 
sistema. Este programa, chamado de sistema operacional, executa as fungoes fundamentals de 






6 


APPLE II 



FIGURA 1.6. Ligagao do Disk II. 


operagao do sistema, como transferir programas de cassette ou disco para a memoria e mostrar na 
tela os dados teclados. 0 sistema operacional do Apple II e chamado de Monitor e sempre reside 
em ROM. 


CONTROLADORES DE DISPOSITIVOS EXTERNOS 

Veja as pequenas placas verticais de circuitos impressos colocadas na parte traseira da placa maior 
do Apple II, que sao colocadas nos conectores vazios (slots). Os slots existem para acomodar os 
circuitos especiais. Tais circuitos, chamados controladores ou cartoes, contem eletronica adicional 
para permitir ao Apple II operar dispositivos perifericos, tais como drives de disco. 

A Apple Computer Inc. produz alguns cartoes que sao colocados nos slots: alguns deles sao 
colocados em slots especfficos, mas a maior parte pode ser colocada em qualquer slot. Na maior 
parte, os cartoes necessitam de marcas, identificagoes ou outros sinais porque e dif icil para os ini- 
ciantes distinguir um do outro. Cada cartao e marcado com seu nome, mas o nome nem sempre e 
visivel quando o cartao esta conectado. Voce pode identificar o cartao pelo lugar onde ele esta 
instalado e pelo que esta conectado nele. Como mostrado na Figura 1.6, o cartao de controle do 
Disk II costumeiramente esta no slot 6; um ou dois drives podem ser conectados a ele. Um segundo 
controlador do Disk II pode ocupar o slot 5 para um terceiro e quarto drive de disco, um terceiro 
controlador pode ocupar o slot 4 para os drives 5 e 6 etc. 

Vamos ver alguns dos outros cartoes que voce pode ter no Apple 11. 

Cada um dos tres cartoes mostrados na Figura 1.7 permite operagao com linguagem de pro- 
gramagao no Apple II. Existem duas versoes da linguagem BASIC dispomveis: BASIC integral e 
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FIGURA 1.7. Esquerda para Direita: Cartoes Language System, Applesoft Firmware 

e Integer BASIC. 



FIGURA 1.8. Cartao de Interface Serial. 


Applesoft. Instalando o cartao apropriado no slot 0 pode-se passar de uma linguagem para outra. 
O Language System e o Applesoft Firmware operam em qualquer tipo de Apple II, mas o BASIC 
integral e especffico para o Apple II Plus. 0 cartao Language System torna dispomveis outras 
linguagens, como Pascal, da mesma forma. 

0 cartao de interface serial (Figura 1.8) usualmente ocupa o slot 1. 0 dispositivo mais 
comum ligado a ele e a impressora. 
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Nao e frequente o uso ao cartao de interface para/e/a mostrado na Figura 1.9) ser usado 
juntamente com o de interface serie, porque ele invariavelmente tem uma impressora conectada 
nele. Assim, o cartao interface de impressora paralela pode usualmente residir no slot 1. 

A Figura 1.10 mostra o cartao de interface de co muni cacao. Com um modem conectando a 
interface com a linha telefonica, seu Apple II pode falar com outros computadores em lugares 
remotos. 



FIGURA 1.10. Cartao Interface de Comunicapao. 












APRESENTANDO O APPLE II 


9 


Existem mais cartoes disponfveis para inumeras aplicacoes de outras fontes que nao a Apple 
Computer Inc. Por exemplo, pode-se conectar cartoes para controle de luzes e outros dispositivos 
eletricos. Outro cartao permite que se escrevam programas que sintetizam eletronicamente o som 
de instrumentos musicals. Existe ainda urn cartao que funciona como extensor; ele usa um slot do 
Apple II e possui varios slots para cartoes adicionais num chassis separado. 

Alguns sistemas de Apple II tern um cartao especial instalado para permitir duas vezes mais 
caracteres do que uma linha normal de display. Nesse caso, o monitor de TV (um televisor normal 
nao funciona) e conectado no cartao especial ao inves da conexao na placa principal. 0 cartao 
especial se conecta num dos slots da parte traseira da placa principal, normalmente slot 3 ou 4. 
A Figura 1.11 mostra um cartao tfpico. 


CONTROLE DE JOGOS 

Vamos concluir nossa tournee pelo interior do Apple II com uma vista sobre os dispositivos de 
controle de jogos que se podem ligar, como mostrado na Figura 1.12. Os controles de jogos sao 
usados com mais frequencia em programas dedicados a lazer, mas podem ser aplicados, da mesma 
forma, em outras atividades. Estes dispositivos nao sao obrigatorios. 


IMPRESSORA 

Vamos observar agora a impressora do sistema (Figura 1.13). 

A impressora se conecta ao sistema tanto pela interface serial quanto pela paralela (depen- 
dendo do tipo de impressora usada), geralmente pelo slot 1. Existem impressoras de todos os tama- 



FIGURA 1.11. Dispositivo para Formataqao Especial da Tela. 
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FIGURA 1.12. Dispositivos para Controle de Jogos. 



FIG UR A 1.13. Conexao da Impressora. 
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FIGURA 1.14. Conexao da Tabua Grafica. 


nhos, pregos e caracteristicas. Algumas tem qualidade de impressao identica a produzida por ma- 
quina de escrever. Outras podem produzir graficos (ate coloridos); as demais tem caracteristicas 
de compromisso entre uma e outra. 


tAbua grafica 

A tabua grafica da Apple Computer Inc., mostrada na Figura 1.14, e um dispositivo portatil que 
explora a capacidade grafica do Apple II de forma especial. Com sua caneta, pode criar figuras, 
desenhos, mapas, graficos e outros desenhos livres diretamente na tela, em cores. Sob sua diregao, 
ele desenha linhas retas, formatos solidos e pontos. Seu desenho pode ocupar a tela inteira ou ape- 
nas parte dela. Pode-se mover o desenho ao largo da tela, aumenta-lo, reduzi-lo e separar suas cores 
uma a uma. Em qualquer momento durante esse processo, pode-se guardar o desenho obtido em 
disco para chama-lo depois. Pode-se ainda medir distancias com este dispositivo. 
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Como o Apple II Opera 


Qualquer sistema de computador intimida um pouco quando nos sentamos a sua frente, mesmo 
que esteja inteiramente instalado, como o seu Apple II deve estar antes de prosseguirmos. Este 
capitulo vai tornar mais confortavel seu relacionamento com o Apple II, explicando como usa-lo, 
mas nao como monta-lo. Os manuals de usuario que vem com cada um dos equipamentos de 
fSbrica trazem informapao completa para ajud^-lo na instalapao. Se for necessaria mais assistencia 
para certificar-se que tudo esta correto, verifique com outra pessoa que tambem tenha um Apple II 
como o seu, ou com o distribuidor que Ihe forneceu o equipamento. 


LIGANDO NA TOMADA 


Verifique que todos os componentes do sistema estejam ligados juntos, corretamente, e ligue o 
televisor. Deixe o volume no mrnirno. Coloque a chave do dispositivo conectado a antena de TV 
na posipao GAME ou COMPUTER. Sintonize o canal especificado nas instrucoes que acompanham 
o modulador de RF (normalmente canal 33). Se voce nao sabe qual canal usar, pergunte a alguem 
que tenha um sistema igual ou contate o seu fornecedor. 

Procure a chave liga-desliga atras do Apple II, perto de onde sai o cabo de forpa. Ligue a 
chave. Voce devera ouvir um sinal vindo de dentro do equipamento. 0 sinal indica que o compu* 
tador esta pronto. A lampada POWER do teclado devera acender, a menos que esteja queimada. 

Se o sinal nao for ouvido, desligue a chave e ligue novamente. Se nada for ouvido, desligue 
o computador. A lampada acendeu? Se nao, desligue o Apple II e ligue uma lampada ou radio para 
ver se hS forpa na tomada. Leia as instrupoes novamente e confira as conexoes para certificar*se de 
que tudo esta ligado corretamente. Se ainda assim o computador nao emitir o sinal, DESLIGUE-O! 
Desconecte da tomada e pepa auxflio a alguem que tenha mais experiencia (seu distribuidor, por 
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exemplo). Voce podera causar muitos danos tentando mexer no computador ou desligando cone- 
xoes de fios. 


0 QUE voce v£ NO TELEVISOR 

Uma vez ligado, e depois de soar o sinal indicando que tudo est3 correto, aparecerS uma imagem 
na tela do seu televisor. 

0 conteudo da imagem depende do tipo de Apple II que estiver sendo ligado, mas uma coisa 
e bem distingufvel, por ficar piscando em intervalos regulares de tempo; este retangulo branco 
piscante e o chamado cursor. Ele marca a posipao onde o proximo caractere digitado no teclado 
aparecera na tela. A proxima sepao explica o que fazer se o cursor nao aparecer. 


Se Voce nao Vir o Cursor 

Seu Apple II pode ter o cartao Language System instalado com um ou mais drives do Disk II. 
Neste caso nao se ve o cursor. Em seu lugar ouve-se barulho de estalos e chiados vindos do drive 
do Disk II, e a lampada vermelha IN USE na caixa do drive estara acesa. Por ora, quando isso 
acontecer acione a tecla RESET. 0 cursor aparecera e o drive de disco ficarS em silencio. Va para 
a proxima sepao. 

Alguns sistemas como o Apple II sao configurados para permitir mais de 40 caracteres em 
cada linha. Para ver o cursor nestes casos deve-se digitar uma sequencia de comandos especiais 
como segue: 

1. Acione a tecla Ctrl e mantenha-a abaixada, acione a tecla B e em seguida solte ambas. 

2. Para o proximo comando, voce deve saber em qual slot o cartao especial (aquele ao qual o 
monitor de TV esta ligado) esta conectado, provavelmente slots 3 ou 4. Pode-se abrir o 
Apple II e olhar dentro — os slots sao numerados de 0 a 7 da esquerda para a direita. A 
Figura 1.11 explica o que procurar. Pepa ajuda a alguem (seu fornecedor) se estiver em 
duvida. 

3. Se o seu monitor esta conectado no cartao do slot 3, digite PR#3 e acione a tecla 
Return. Se esta no slot 4, use PR#4; para slot 2 digite PR#2 etc. 

4. 0 cursor agora fica visfvel, embora ele possa nao piscar (o que esta correto). Continue 
como descrito abaixo. 


TABELA2.1. Caracteres de Entrada. 


Caractere de Entrada 

Linguagem 

* 

Monitor 

> 

Integer BASIC 

] 

Applesoft 
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O CARACTERE DE ENTRADA 

A esquerda do cursor existe um outro caractere. Ele e o primeiro da linha. Pode ser um asterisco 
(*), um sinal de maior (>) ou um fecha-colchetes (]). 0 Apple II e um computador de multi- 
linguagens e o caractere de entrada indica qual a linguagem que esta esperando instrugao no mo- 
mento. A Tabela 2.1 mostra os tres caracteres de entrada e suas linguagens correspondentes. 


*6 o Monitor 

Em muitas versoes do Apple II o primeiro caractere que se ve ao se ligar o aparelho e o *. Se este 
nao for o seu caso pule esta segao e a seguinte. 

0 asterisco e a entrada para o Monitor de Linguagem Assembler do Apple II. Em geral, 
apenas os usuarios mais avangados tern a necessidade de se comunicar diretamente com o Monitor. 
Se voce deseja experimentar, pode faze-lo. Embora nao haja condicao de fazer nada por ora com o 
Monitor, voce devera desligar e religar a chave para anular a entrada do Monitor e cancelar os 
efeitos da experiencia. 

Quando o * aparece, deve-se dizer ao Apple 11 que pule para o BASIC. 


Ctrl-B em BASIC 

Existe um comando no Monitor que instrui ao Apple II para pular para o BASIC. Para permitir 
este comando, acione e deixe acionada atecla CTRL, enquanto aciona e solta atecla B. Solte entao 
a tecla Ctrl e acione RETURN. Um caractere de entrada diferente aparecera entao sobrepujando 
o * . Dependendo do tipo de Apple II usado e de suas opgoes, aparece o caractere > ou ]. 

A palavra BASIC vem de Beginner's All-purpose Symbolic Instruction Code, uma linguagem 
de computagao muito usada, desenvolvida pelo Instituto Dartmouth. 0 Apple II suporta duas 
versoes de BASIC: o Integer BASIC e o Applesoft. Ambas as versoes contem caracterfsticas do 
BASIC original de Dartmouth. 


> 6 o Integer BASIC 

0 caractere > indica que o Apple II esta pronto para receber instrugoes em Integer BASIC. As 
regras do Integer BASIC sao diferentes daquelas do Applesoft, mas as duas tern muita coisa em 
comum. Por ora concentremo-nos nas instrugoes que sao comuns as duas versoes, de forma que 
nao precisa haver preocupagoes com o tipo de BASIC usado. 


] e o Applesoft 

0 caractere ] informa que o Apple II esta pronto para receber instrugoes do Applesoft. Nao se 
preocupe por ora com o tipo de BASIC que esta usando. Quando isso se tornar importante, abor- 
daremos as diferengas entre ambos. 
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O TECLADO 


0 teclado do Apple II (veja Figura 2.1) se parece em muito com o teclado de uma maquina de 
escrever comum, mas ele tern cinco teclas que nao existem nessas maquinas. Duas estao a esquerda, 
com as inscricoes misteriosas Esc e CTRL. As outras tres estao a direita, com RESET, Exis¬ 

tem mais duas teclas do lado direito desconhecidas: Return e Rept. 

Va em frente e digite no teclado. Tudo que for colocado no computador pode ser cancelado 
ligando e desligando a chave. 

Durante a digitagao, pode-se perceber que todas as letras digitadas sao maiusculas, como se 
ve na tela, a menos que se acione a tecla SHIFT antes de se teclar uma letra. 0 Apple II standard 
so sabe mostrar na tela as letras maiusculas. Pode-se conectar urn dispositivo que permite o uso 
de maiusculas e minusculas. Alem disso, existem programas que sabem como mostrar na tela tanto 
maiusculas quanto minusculas. 


A Tecla RESET 

RESET e uma tecla muito especial no teclado do Apple II. Quando o RESET e acionado, para 
tudo. Nao importa o que o computador esteja fazendo no momento que se aciona o Reset, o 
controle do Apple II retorna ao teclado. Dependendo do Apple II, o RESET faz voltar ao Monitor, 
Integer BASIC ou Applesoft com o aparecimento do caractere de apresentagao respectivo. 

As vezes o Reset causa um bocado de problemas, especialmente se o Disk II esta sendo 
usado no momento em que se aciona a tecla. Assim, deve-se prestar muita atengao para nao acionar 
a tecla RESET acidentalmente. Tome cuidado especial ao acionar a tecla RETURN, pois o dedo 
pode facilmente subir um pouco mais acionando o RESET sem querer. Algumas versoes do Apple 
II dao uma protegao especial contra esta agao, exigindo o acionamento da tecla CTRL-RESET ao 
inves de simplesmente RESET (veja a discussao sobre a tecla CTRL a seguir). 



FIGURA 2.1. 0 Teclado do Apple II. 
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A Tecla RETURN 

A medida que se digita, os caracteres sao mostrados na tela. Alem disso, o Apple II guarda tudo 
na memoria sem tentar interpretar o que foi teclado ate que se acione a tecla RETURN. Esta tecla 
informa ao computador que a linha de comando que estava sendo digitada ja terminou. Quando se 
aciona RETURN, o Apple II limpa qualquer caractere estranho a direita do cursor. Entao faz a 
analise do comando digitado. Se a sequencia de caractere representar urn comando que ele pode 
executar, ele executa a apao apropriadamente. Por outro lado, se for ouvido osinal sonoro e apa- 
recer uma das mensagens abaixo (ou eventualmente outra mensagem do mesmo tipo): 

7SYNTAX ERROR 
*** SYNTAX ERR 

0 Apple II esta dizendo que nao entendeu o comando dado antes da digitapao da tecla 
RETURN. Voce deve redigitar a linha (sem o erro detectado pelo Apple II). 


A Tecla SHIFT 

As letras sao sempre maiusculas no Apple II standard. Assim, a tecla SHIFT nao muda as letras de 
minusculas para maiusculas. Ela faz com que uma mesma tecla permita dois caracteres diferentes. 
Urn deles e obtido pelo acionamento apenas da tecla, sem a tecla SHIFT. 0 caractere que se obtem 
pelo acionamento da tecla em conjunto com SHIFT e mostrado na parte de cima da tecla. 

Usa-se a notapao SHIFT- para descrever o duplo acionamento envolvendo a tecla SHIFT. 
Por exemplo, SHIFT-3 produz o caractere #. 

Algumas teclas de letras nao imprimem letras quando se usa a tecla SHIFT. A tecla N, por 
exemplo, imprime A , e um @ e apresentado quando se aciona Shift-P. A tecla G tern a palavra 
BELL escrita no alto, o Shift-G imprime a letra G, e nao fornece o sinal sonoro. 

A Tecla CTRL 

CTRL e a contrapao de control. A tecla CTRL sempre e usada junto com outra tecla da mesma 
forma que o SHIFT. Deixa-se a tecla CTRL acionada enquanto se aperta e solta a outra tecla. Este 
livro se refere ao acionamento da tecla CTRL com outra tecla pela especificapao Ctrl-. Por 
exemplo, Ctrl-B significa que as teclas Ctrl e B devem ser acionadas em conjunto. 

A tecla Ctrl, como o SHIFT, permite a algumas teclas que tenham funcoes especiais. A 
tecla G e a unica que tern informada no alto a sua funcao obtida com a tecla Ctrl: BELL. A 
funpao do BELL fica obvia quando se aciona Ctrl-G e o Apple II responde com o bip. Ativou-se 
o sinal sonoro do computador. 

Existem outras combinacoes de CTRL que causam varias reaches ao Apple II. Ainda ha 
pouco mencionamos o comando CTRL-B no Monitor que faz a passagem para o BASIC. 

Outra combinapao interossante e o Ctrl-X. Ela informa ao Apple II que deve esquecer 
tudo o que foi digitado na linha de comando presente para que se recomece. Tente digitar qualquer 
coisa e em seguida acionar o CTRL-X. 0 cursor volta para o infcio da linha. Os caracteres antigos 
ainda permanecem na tela mas nao tern mais significado para o computador. Ele entende como se 
eles nunca tivessem sido digitados. 


COMO O APPLE II OPERA 


17 


A Tecla Esc 

ESC vem de escape, que e um termo usado desde quando as teletypes eram os terminais mais 
usados. Embora o nome sugira, acionar a tecla ESC nao provoca interrupcoes. A tecla ESC tem 
muitos usos, alguns dos quais aparecem neste capitulo e o resumo aparece no proximo. 

Diferentemente de SHIFT e CTRL, a tecla ESC nunca e usada em conjunto com outra tecla. 
Ela e acionada e solta em separado, antes que outra seja acionada. Esta operacao da tecla ESC 
com outra e chamada sequencia de escape. 

Uma sequencia simples de escape e Esc-@. Aciona-se esta sequencia de escape, primeiro 
acionando a tecla ESC, a seguir acionando e mantendo acionada a tecla Shift, enquanto se 
aciona a tecla P (SHIFT-P = (£'). 0 resultado? Tudo o que esta na tela e zerado, e o cursor se move 
para o canto esquerdo no alto da tela. (Em “computes" o canto esquerdo no alto da tela e cha- 
mado de home.) 


As Teclas <- e -> 

As duas teclas de flechas sao chamadas de flecha-a-esquerda e flecha-a*direita. 

As teclas +- e -* sao muito uteis porque com elas pode-se corrigir erros de digitacao que 
eventualmente tenham sido cometidos, bem como alterar dados que tenham sido colocados. 
A tecla como a tecla backspace em maquinas de escrever, cada vez que e acionada, o carac- 
tere sob o cursor e apagado da memoria do Apple II e o cursor volta uma posicao para a esquerda. 
Tente agora. Digite uma palavra (tente PRINT). Acione «- varias vezes e veja como o cursor volta 
percorrendo a palavra digitada de tras para diante. Veja que os caracteres nao sao apagados da 
tela. Pode ter certeza que eles ja foram esquecidos pelo Apple II. Tente voltar o cursor todo a 
esquerda da tela. Quando se chega ao limite e se aciona <- de novo, o cursor volta uma linha e 
o novo caractere de entrada aparece. 

Como voce deve estar suspeitando, a tecla -»■ move o cursor para a direita ao longo da 
linha digitada. A medida que ele vai para a direita, todo o caractere pelo qual o cursor passa e 
copiado pela memoria do Apple 11 exatamente como seria se ele fosse recem-digitado. Para ver a 
tecla -* em agao, digite uma nova palavra e volte o cursor alguns caracteres usando Agora acione 
-► algumas poucas vezes. Cada vez que essa tecla e acionada, o caractere pelo qual o cursor passa 
e levado de volta para a memoria do Apple II, como se ele estivesse sendo redigitado. 

A Tecla Rept 

REPT e abreviagao de repetigao. Se a tecla REPT fica acionada e outra tecla e tocada ao mesmo 
tempo, esta outra tecla sera repetida ate que ambas se soltem. Isso e bastante util quando a outra 
tecla e de flecha e e necessario limpar («-) ou recopiar (-►) muitos caracteres. 

Para que a fungao de repetigao funcione corretamente, deve-se primeiro acionar a tecla cuja 
fungao se deseja repetir, acionando-se entao a REPT. Soltando a REPT a repetigao cessa. 


As Outras Teclas 

As outras teclas do Apple II, sem duvida sao familiares. Sao elas as letras do alfabeto, os numeros 
de zero a nove, e um conjunto de smnbolos padronizados. 
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Muitos datilografos nao distinguem entre o numero zero e a letra O ou entre a letra / e o, 
numero um. 0 Apple II nao pode aceitar esta ambiguidade. Deve-se tomar bastante cuidado para 
que se digite um numeral quando se pede um numeral. Para ajuda-lo a lembrar, o teclado do 
Apple II mostra o zero com uma barra cruzada, e os zeros mostrados na tela tambem tern esta 
barra. 


O GRAVADOR CASSETTE 


Se o seu sistema possui um gravador cassette, ele pode receber programas atraves de fitas cassette. 
Algumas delas vem com o Apple II; pode-se comprar outras; e pode-se tambem montar um arquivo 
com fitas proprias. (Veja explicates no Capi'tulo 4.) 


Manuseando Cassettes 

Deve-se ter cuidado com o manuseio das fitas cassettes. Elas se danificam muito facilmente. Nao 
importa o quanto sua pele seja limpa; o oleo natural estraga a fita. Certifique-se de que colocou as 
fitas em suas caixas corretas apos usa-las. Nao as guarde em lugares quentes, sob a luz direta do sol. 
ou sob campos magneticos (tais como os encontrados perto de motores eletricos). 


Rotule Todos os Cassettes 

Deve-se rotular os cassettes com informagao sobre os programas que eles contem. Isso evita o 
aborrecimento de pesquisar todo um arquivo de cassettes, um a um, para se obter um programa 
desejado. 


Protegendo os Cassettes Contra Escrita 

Cada cassette tern dois entalhes na parte traseira. Os gravadores geralmente tern um dispositivo que 
sente a presenga destes entalhes e nao permitem nova gravacao se eles nao estao presentes. As fitas 
novas tern um pedago de plastico cobrindo o entalhe, de forma que se pode gravar e ler a vontade. 
Os programas importantes gravados nos cassettes podem ser protegidos removendo a cobertura 
de plastico. 

Para determinar qual dos dois entalhes e o correto, segure o cassette de forma que a parte 
exposta da fita fique exposta para a frente e o lado que se deseja proteger seja o de cima. Remova a 
parte plastica do lado direito para evitar gravagoes sobre a superffcie superior (veja a Figura 2.2.). 
Cobrindo o entalhe com fita adesiva pode-se gravar dados numa fita que foi protegida. 


Ajustando o Volume de Leitura 

Deve-se determinar o volume de leitura do gravador cassette no rn'vel proprio para o Apple II. Se o 
volume for muito alto ou baixo, a informagao da fita sera distorcida e o computador nao sera 
capaz de entende-la. 
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Liberam a gravapao 


FIGURA 2.2. Dispositivos de Protepao em Fitas Cassette. 


A unica forma de determinar o rn'vel de volume correto para seu gravador e o metodo de ten- 
tativa e erro. Aqui esta urn procedimento geral. Primeiro, tente carregar um programa com o volu¬ 
me bem baixo. Se nao funcionar, aumente um pouco e tente de novo. Permanepa ajustando para 
cima ate que o programa seja carregado satisfatoriamente. 

Pode-se usar uma das fitas que vem com o Apple II. Se o caractere de entrada apos o cursor 
for ], ache o cassette chamado "Color Demosoft". Se o caractere de entrada for >, ache o cassette 
chamado "Color Graphics". 

Coloque a fita no gravador. Certifique-se de que o nome do programa estS em cima. Para 
cada posipao do controle de volume: 

1. Rebobine a fita completamente. 

2. No teclado do Apple II, digite a palavra LOAD. 

3. Aperte o botao PLAY do gravador para iniciar a leitura. 

4. Acione a tecla RETURN. 

Apos acionar RETURN, o cursor desaparece. Depois de 15 ou 20 segundos, pode-se analisar 
o ocorrido. 

Se apareceu a mensagem 7SYNTAX ERROR ou ***SYNTAX ERROR, nao ajuste o volume, 
volte ao passo 1 e tente novamente. Se acontecer de novo, tente limpar a cabeca de leitura ou usar 
uma fita ou gravador diferente. 

Se nada acontece, ou se e mostrado ERR ou ERRERR, acione RESET, coloque o volume um 
pouco mais alto, e tente novamente. 

Se for ouvido o bip, ou nenhuma mensagem aparecer, as coisas vao indo bem. 0 Apple II 
achou o ini'cio do programa da fita e esta carregando. Depois de mais uns 15 segundos (dependen- 
do do tamanho do programa da fita), vai ser ouvido outro bip e o caractere de entrada, bem como 
o cursor, reaparecerao na tela. Deve-se entao desligar o gravador. Anote o volume utilizado para 
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que nao seja necessario repetir este processo novamente quando estiver usando o gravador longe 
do Apple II. 

Quando for visto o caractere de entrada do BASIC e o cursor, o programa foi carregado com 
sucesso. 


USAIMDO O DISK II 


Se o sistema possui um ou mais drives do Disk II conectado ao Apple II, pode-se operar programas 
de disquettes ao inves de cassettes. 0 “System Master Diskette” fornecido junto com o Apple II 
tern a maioria dos programas que a Apple Computer Inc. fornece com os cassettes, mais alguns 
programas extras especialmente projetados para o Disk II. 


Manuseando Diskettes 

Deve-se ter extremo cuidado no manuseio de disquette. Eles sao muito mais delicados do que os 
cassettes. Nunca dobre um disquette. Nunca toque a superffcie do disquette (a parte que aparece 
sob a abertura oval), e nunca force a entrada de um disquette no drive do Disk II. Sempre reco- 
loque o disquette em sua capa protetora quando ele estiver fora do drive, e proteja-o contra o 
calor, a luz direta do sol e campos magneticos (como os encontrados perto de motores eletricos). 
Tenha especial cuidado com o "System Master Diskette". 


Como Colocar os Disquettes Dentro do Drive do Disk II 

A forma apropriada de inserir o disquette no drive do Disk II e mostrada na Figura 2.3. Segure o 
disquette entre os dedos polegar e indicador de forma que o polegar cubra a etiqueta. Abra a porta 
do drive do Disk II e suavemente coloque o disquette totalmente dentro do drive. Nao deve haver 
resistencia. Uma vez que o disquette esteja dentro do drive, feche a porta gentilmente. Ela deve 
fechar-se facilmente. Se houver alguma resistencia, solte a porta e empurre o disquette inteira- 
mente para dentro do drive, tentando novamente. Se a porta for forqada, destruira o disquette. 
As vezes ajuda esperar que o disquette seja centrado, esperando que o drive comece a girar e entao 
fechando a porta. 


O SISTEMA OPERACIONAL EM DISCO 

Antes que se possa usar qualquer programa do drive de disco, deve ser colocado na memoria um 
programa especial chamado Disk Operating System. Este programa, tambem chamado DOS con- 
trola as atividades realizadas pelo drive de disco. O processo de colocar uma copia do DOS na 
memoria e chamado de booting. Em "computes" diz-se fazer o "boot do disco" ou "boot do 
DOS" ou simplesmente "boot DOS". 

Deve-se executar o boot do DOS a cada vez que se desliga o equipamento e se liga novamente. 


COMO O APPLE II OPERA 


21 



FIGURA 2.3. Inserindo o Disquette no Disk II. 



FIGURA 2.4. Drive de Disco Standard para o Boot do DOS. 
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Fazendo Boot do DOS 

Existem varias formas diferentes para fazer o boot do DOS, dependendo da configurapao do sis- 
tema e da linguagem utilizada para iniciar o boot. Cada metodo assume que o drive de disco esta 
conectado no slot 6 e o drive 1 esta ligado no cartao de controle. Isso e mostrado na Figura 2.4. 

Coloque o "System Master Diskette" no drive correto e feche a porta do mesmo. Em alguns 
casos, quando o Language System esta presente, deve-se usar urn disquette especial, o "Integer and 
Applesoft II" antes do disco do DOS. Esta situacao e descrita abaixo na secao sobre boot com o 
Language System. 

Apos urn boot bem-sucedido usando urn dos metodos acima descritos, a tela deve parecer 
com um dos padroes mostrados na Figura 2.5. 


Boot Autostart 

A forma mais facil de fazer o boot e pelo boot autostart. Como o nome indica, o boot e automa¬ 
tic. Para tornar o Boot Autostart possi'vel, seu equipamento deve ter o Autostart Monitor. Se, 
quando se ligar o Apple II, o drive do Disk II ranger e estalar, e a lampada vermelha IN USE da 
parte frontal do drive ficar ligada, o sistema possui o Autostart Monitor. 

Quando ele esta presente sem o Language System, o boot do DOS e um procedimento de um 
so passo. Com o Apple II desligado, coloque o "System Master Diskette" no drive do Disk II 
apropriado e feche a porta. Ligue o aparelho. Apos alguns segundos, o disco para e a tela passa a 
mostrar um quadro semelhante a um dos mostrados na Figura 2.5. 


Boot a Partir do Monitor 

Quando o caractere de entrada * aparece na tela, o Monitor de Linguagem Assembler esta aces- 
sado e esperando comandos. Existem algumas formas de fazer o boot do disco a partir do Monitor. 


Salto do Monitor para o Boot 

Pode-se fazer o boot do DOS do drive 1 no slot 6 (veja Figura 2.4) com o seguinte comando dado 
no Monitor: 


*C6QQG 

Lembre-se de acionar a tecla Return. A lampada vermelha IN USE do Disk II acendera, e em 
alguns segundos a tela se parecera com o visto na Figura 2.5. 


Boot do Monitor com o CTRL-P 

0 outro comando do Monitor para gerar o boot do DOS e atraves do Ctrl-P. Para fazer o boot a 
partir do Monitor usando este comando, digite o numero do slot do drive que se deseja ler no disco 
(usualmente 6), acionando Ctrl-P (nada aparecera na tela). Agora acione RETURN. Apos alguns 
segundos a tela se parecera com aigo da Figura 2.5. 
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FIGURA 2.5. Boot Satisfatbrio do System Master Diskette. 
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Boot a Partir do Integer BASIC ou Applesoft 

0 mesmo comando de boot e reconhecido por ambas as versoes de BASIC, Integer e Applesoft. 

Apos a entrada do BASIC (> em Integer BASIC ou ] em Applesoft) digite as letras IN ou 
PR, o sinal de #, e o numero do slot de onde se fara o boot (usualmente 6). 0 comando se parece 
com: 


INtt6 
PR If 6 

Agora acione a tecla RETURN. Apos alguns segundos a tela se parecera com o mostrado na Figura 
2.5. 


Boot a Partir do Language System 

Sob tais condipoes, fazer o boot do DOS com a presenpa do System Language e um procedi mento 
com dois passos. A versao do DOS a ser usada determina o procedi mento. 0 numero de versao do 
DOS no "System Master Diskette" estS estampado no proprio disquette. E um numero como 3.3, 
3.2.1 ou 3.2. 

Entrando com a versao 3.3 do DOS, nao importa se existe ou nao o Language System. Use 
o "System Master Diskette" com um dos procedimentos descritos acima. 0 DOS e carregado do 
disquette para a memoria. Outro passo e executado automaticamente e faz com que tanto o 
Integer BASIC quanto o Applesoft fique dispom'vel imediatamente, via Language System. Quando 
o Disk II cessa, o boot esta terminado e a tela fica semelhante a uma daquelas mostradas na Fi¬ 
gura 2.5. 

Carregar as versoes 3.2.1, 3.2 e menores do DOS requer dois disquettes. Primeiro e preciso 
colocar o disquette chamado "Integer and Applesoft II" no Disk II correto, normalmente aquele 
conectado no slot 6, e drive 1. Entao executa-se uma das funcoes para boot descritas acima. 0 
drive emite alguns sons e a lampada vermelha IN USE na frente da caixa do drive acende. Em 
poucos segundos, aparece a seguinte mensagem na tela: 

INSERT BASIC DISK AND PRESS RETURN 

Abra agora o drive e remova o disquette. Insira o "System Master Diskette" no drive e feche 
a porta. Acione a tecla RETURN do teclado. Apos mais alguns segundos, a tela se parecera com 
uma das telas da Figura 2.5. Isso indica que o boot foi executado corretamente. 


Como Ver o Catalogo de Disquettes 

Se o boot foi executado corretamente, pode-se ver que programas o disquette contem. No teclado 
do Apple 11 digite: 

CATALOG 

A tela mostrara algo como o que esta abaixo. (Voce se lembrou de acionar a tecla RETURN?) 
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DIS 

;K VOLUME 254 

* I 

002 

HELLO 

*1 

053 

APFLE-TREK 

*1 

018 

ANIMALS 


009 

UPDATE 3.2.1 

*1 

014 

COPY 

*1 

009 

COLOR DEMO 

*1 

053 

BRICK OUT 

*1 

026 

SPACE WAR 

*1 

050 

THE INFINITE 

*r 

051 

COLOR SKETCH 

*i 

053 

SUPERMATH 

*i 

026 

APPLEVISION 

*i 

017 

BIORHYTHM 

*i 

027 

PINBALL 


Como Fazer o Boot de Outros Disquettes 

Descrevemos como realizar o boot do DOS a partir do "System Master Diskette". 0 procedi- 
mento e exatamente o mesmo para qualquer disquette onde foi colocado o Disk II. Os disquettes 
inicializados para outros computadores ou outro tipo de drives normalmente nao funcionam no 
drive do Disk II. 


PREPARANDO NOVOS DISQUETTES 

De tempos em tempos precisa-se de novos disquettes para os programas que se rodam no Apple II. 
Antes de se usar um disquette com o Disk II pela primeira vez, deve-se inicializa-lo. Se o programa 
especi'fico que se esta usando inclui rotina especial para inicializar disquettes, use-a preferencial- 
mente. Na sua ausencia, pode-se usar o metodo geral a seguir para preparar disquettes extra. 

0 processo de inicializagao torna o disquette pronto para uso subsequente. Durante a iniciali¬ 
zagao, seja qual for o programa BASIC que esta sendo usado, ele e salvo na memoria, e se torna o 
programa de apresentacao do disquette. 0 programa de apresentagao e automaticamente carregado 
e rodado toda vez que se faz o boot do disquette. Se existe um programa de apresentagao em sua 
mente, OK. Se nao, pode usar a Figura 2.6 como modelo. Use o programa exatamente como e 


NEW 

10 REM INICIALIZADO EM data 

20 REM MEMORIA DO SISTEMA bytes 

30 REM VERSAO DO DOS numero 

40 PRINT "nome do disco" 

50 END 


FIGURA 2.6. Modelo de Apresentagao de um Programa. 
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mostrado exceto para os termos em letras minusculas, que devem ser substitufdos pelas infor- 
ma^oes de momento. Em data, coloque a data na qual o disquette esta sendo inicializado. Em 
bytes, coloque o numero de bytes da memoria do sistema (32K, 36K etc.). O numero e o numero 
da versao do DOS que est2 presente no disquette mais recente (algo como 3.2, 3.2.1 ou 3.3). 
0 nome do disquette e o nome que se deseja dar para aquele disquette especial. Abaixo vai uma 
ilustrapao de um programa de inicializapao: 

NEW 

10 REM INICIALIZADO EM 1/1/81 
20 REM MEMORIA 00 SISTEMA ASK 
30 REM VERSAO DO DOS 3.2.1 
AO PRINT "MISC./VOL.3* 

50 END 

Assim, para inicializar um disquette, primeiro prepare o programa de apresentapao, ponha o 
disquette no drive, se digite o seguinte comando: 

INIT HELLO 

Certique-se que a porta do drive esteja fechada e acione RETURN. A lampada vermelha do 
drive acenderci, acompanhada dos estalos e rui'dos caracterfsticos. O processo inteiro de iniciali- 
zapao leva aproximadamente dois minutos, de forma que deve haver paciencia. Quando a lampada 
apaga, o processo estara completado. 

Agora prepare uma etiqueta para o disquette. Remova-o do drive e aplique a etiqueta. 


CARREGANDO E RODANDO UM PROGRAMA 


Existem muitos programas ja escritos para o Apple II. Alguns vem em cassettes, outros em dis- 
quettes, ou em ambos. Alguns deles sao escritos em Integer BASIC e outros em Applesoft. De 
forma geral, um programa escrito para o Integer BASIC nao funciona no Applesoft e vice-versa. 


USANDO A VERSAO CORRETA DO BASIC 

Embora muitas versoes do Apple II venham com as duas versoes da linguagem, nem todas tern essa 
possibilidade. 0 Apple II Plus nao tern o Integer BASIC a menos que o cartao Language System ou 
o cartao Integer BASIC estejam presentes. Por outro lado, o Applesoft nao e encontrado em 
muitas versoes do Apple 11 a menos que se leia um interpretador de cassette ou disco. 

Em um Apple II standard e facil obter a entrada no Integer BASIC (>). Acione a tecla 
RESET e a seguir o CTR L-B (lembrando-se de terminar com RETURN). 

E diffcil de se obter o caractere de entrada do Applesoft em um Apple II standard, desde 
que ele reside num disco ou fita. Deve-se instruir o computador para carregar o interpretador do 
Applesoft na memoria a partir do disco ou da fita. 
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Antes de se usar o drive de disco deve-se fazer o boot do DOS como descrito anteriormente 
neste capftulo. Uma vez que o DOS esta carregado, pode-se carregar o interpretador Applesoft 
colocando-se o System Master Diskette no Disk II e digitando o seguinte comando: 

FP 

0 drive rangera e estalara por alguns segundos e entao o caractere de entrada do Applesoft (]) 
aparecera na tela. 

Pode-se tambem obter o interpretador do Applesoft a partir de fita cassette. Use o cassette 
chamado "Applesoft II" (da Apple Computer Inc.), coloque-o no gravador e rebobine-o todo. 
Digite o comando: 

LOAD 

Antes de acionar o Return, acione a tecla PLAY para inciar o movimento do gravador. 
Logo se ouvira o bip do Apple II, o que indica que foi iniciado o carregamento do interpretador 
Applesoft. 0 tempo gasto vai de urn minuto e meio a dois minutos. Uma vez carregado o pro- 
grama, sera dado urn segundo bip. Desligue o gravador cassette. 0 caractere de entrada do Apple¬ 
soft estara presente na tela. 

A partir do Applesoft, pode-se passar para o Integer BASIC digitando o comando: 

I NT 

Desejando voltar para o Applesoft, deve-se recarregar o interpretador Applesoft do disco ou 
do cassette. 


CARREGANDO UM PROGRAMA DO CASSETTE 

Com a versao apropriada do BASIC carregada (ou o Apple II apto a fazer a selepao automatica- 
mente), estes sao os passos para carregar urn programa a partir do cassette: 

1. Posicione a fita no infcio do programa. Este sera normalmente no infcio da fita, e nesse 
caso deve-se rebobinar a fita completamente. Se o programa desejado nao esta no infcio 
da fita, deve-se carregar todos os programas precedentes, em ordem, para posicionar a 
fita no lugar correto. 

2. No teclado do Apple II digite o comando, 

LOAD 

3. Aperte o botao PLAY no gravador cassette para iniciar. 

4. Acione a tecla RETURN. 

Apos acionar RETURN, o cursor desaparece. Apos alguns segundos, o Apple II gera o bip 
para indicar que iniciou a carga do programa. Mais tarde um outro bip indica que o processo j3 
terminou. Acione entao o botao STOP do gravador cassette para para-lo. 

0 programa esta carregado. Se nenhum bip for ouvido ou aparecer alguma mensagem de 
erro durante o processo de leitura, reveja o ajuste de volume de acordo com as recomendagoes 
dadas anteriormente, neste capftulo. Se o teclado nao responder a tecla RESET deve ser acionada, 
ou deve-se desligar e ligar o computador. Se for necessario, recarregue o interpretador a partir 
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do cassette ou disquette. Se ainda aparecerem problemas, sua fita cassette provavelmente esta 
inutilizada e deve ser trocada. 


CARREGANDO UM PROGRAMA DO DISCO 

Uma vez que foi feito o boot do DOS, pode-se ler programas a partir do disco, com o comando: 
LOAD no me do programs 

Nome do programs se refere ao programa que deve ser carregado. Naturalmente, o programa indi- 
cado deve estar presente no disco que vai ser colocado no drive. 


INICIANDO A EXECUpAO DE UM PROGRAMA 

Quando o programa desejado esta carregado na memoria, use o comando seguinte para iniciar sua 
execugao: 

RUN 

0 programa sai do controle do Apple II, incluindo teclado e vfdeo. Para recuperar o con- 
trole, pode-se digitar Ctrl-C, em muitos programas. Pode ser que seja necessario acionar a tecla 
RETURN. Se isso nao funcionar, leia as instrugoes de operacao do programa que esta rodando. 
Numa emergencia pode-se acionar a tecla RESET ou desligar o Apple II, porem em ambos os casos 
o programa pode ser perdido. 


CONECTANDO TV COLORIDA 

0 Apple II suporta graficos em cores. Se o programa que esta sendo usado ou escrito usar esta 
caracteri'stica, deve ser feito o ajuste das cores do televisor ou do monitor de TV para um balango 
correto. A Apple Computer Inc. fornece um programa para auxiliar nessa tarefa. Dentro do pro¬ 
grama Integer BASIC (>) use o cassette "Color Graphics". Com o Applesoft, (]) use o cassette 
"Color Demosoft" ou o programa COLOR DEMOSOFT em disquette. Em ambos os casos, car- 
regue e rode o programa de acordo com as instrugoes precedentes neste capi'tulo. 

A tela se parecera com uma das mostradas na Figura 2.7. 

0 que se ve na Figura 2.7 e chamado menu. Um menu permite varias escolhas (quatro, no 
caso) e pede para que voce faga a escolha. Para fixar a cor da TV, selecione o numero 1 acionando 
a tecla 1 e o RETURN. Entao a tela mostrara 16 barras verticals coloridas, como mostrado na 
fotografia da Figura 2.8, so que a cores. 

Como se ve, as cores sao colocadas na parte de baixo da tela. Da esquerda para a direita as 
cores sao: 
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FIGURA 2.7. Menu do Programa COLOR DEMOSOFT. 



FIGURA 2.8. Ajustando as Cores da TV. 
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BLAK Preto 
MGTA Magenta 
DBLU Azul Escuro 
PURP Purpura 
DGRN Verde Escuro 
GREY Cinza 
MBLU Azul Suave 
LBLU Azul Claro 


AQUA Agua 
WITE Branco 


BRWN Marron 
ORNG Laranja 
GREY Cinza 
PINK Rosa 


LGRN Verde Claro 
YELO Amarelo 


Ajuste agora o contraste, brilho, cor e controles de tons da televisao, ate que as cores tenham 
resolugao aceitavel. Preste especial atencao em Purpura, Rosa, Amarelo e os tres tons de Azul. 

Quando terminar o ajuste das cores, acione a tecla RETURN e o menu reaparece. Pode-se 
escolher outro item qualquer para experimentar. Para terminar o programa acione CTRL-C (deve 
ser acionado com a tecla RETURN). 


COMPONENTES MISTURADOS 


Isto inclui as instrugoes especiais de operagao para componentes do sistema. Para outros compo- 
nentes do seu sistema, use o manual de operagao especffico para aquele componente. Se for uma 
impressora, por exemplo, entao deve ser lido o manual da impressora, porque as instrugoes variam 
com o tipo. 


COPIANDO COM ERROS 


0 Apple II e um aparelho maravilhoso, mas ele tern um problema comum a todos os compu- 
tadores. Falta de imaginagao. Toda a instrugao que ele recebe deve estar rigorosamente correta ou 
ele nao operara corretamente. As consequencias de um erro variam entre extremos, podendo 
ser devastadoras. 


MENSAGENS DE ERRO 

Quando se digita alguma coisa errada e aciona a tecla RETURN, o Apple II responde com um bip e 
uma mensagem cri'tica. Frequentemente a mensagem da uma ideia do que houve de errado; mas 
pode nao dar tambem. O remedio, em geral e o mesmo em ambos os casos, repetir a linha. Uma 
completa lista de erros se encontra no Apendice C. 
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CORRIGINDO ERROS DE DIGITAQAO 

A medida que se digita no teclado do Apple II, pode-se cometer erros. Algumas das teclas descritas 
anteriormente podem auxiliar a corrigir erros antes que se acione a tecla RETURN para entrar a 
linha. Sao elas as teclas REPT, Ctrl-X e ESC-@: 

• A tecla <- volta o cursor de uma posicao e zera o caractere que passou. Os caracteres sao 
zerados da linha de comando embora permanepam na tela. 

• A tecla -»• move o cursor para a frente, copiando as letras por que passa. 

• A tecla REPT, usada em conjunto com «- e , permite ir para a frente e para tr£s rapi- 
damente. 

• 0 comando Ctrl-X cancela a linha que esta sendo digitada. 

• 0 comando Esc-@ limpa a tela e coloca o cursor na posipao mais a esquerda em cima. 

Vamos ver como se pode usar estas facilidades de edipao. Suponha que se deseja digitar isso: 

LOAD COLOR DEM080FT 

No lugar disso, digita-se o seguinte: 

LOAS COLOR DEM080FT 

Existem duas chances. Ou aciona-se o CTRL-X para cancelar a linha de comando e reiniciar 
tudo ou se usa a tecla <- para voltar e corrigir o engano. Acione e mantenha a tecla Acione 
entao REPT. 0 cursor corre de volta para o infcio da linha. Retire o dedo da tecla REPT, quando 
o cursor atingir o caractere errado. Lembre-se que a medida que o cursor voltou, todos os carac¬ 
teres que foram passados por ele foram apagados da memoria do computador. Se o retorno foi 
muito rapido, use a tecla -► para alinhar o cursor com a letra errada S. Acione agora a tecla D e 

pronto! A linha esta correta. Voce sabe o que acontece se acionar a tecla RETURN agora? 

LOAD r.:i COLOR DEMOSOFT 

Todos os caracteres a direita do cursor vao ser desprezados. 

LOAD 


Isso nao esta certo! Antes de acionar RETURN, deve-se mover o cursor para o fim da linha. 
Pode-se ainda redigitar a linha inteira, porem isso pode ocasionar outro erro. A tecla -► (junto com 
REPT) move o cursor para o fim da linha, automaticamente reentrando os caracteres passados. 


Reset ACIDENTAL 

Mais cedo ou mais tarde, a tecla RESET sera acionada por engano. Isso e inevitavel, a menos que 
seu Apple II requeira a digitapao de Ctrl-Reset ao inves de simplesmente RESET. Pode-se reduzir 
o azar retirando a capa de plastico da tecla e deixando apenas a haste (Figura 2.9). 

Pode-se tomar uma precaupao a mais e tornar a tecla RESET mais diffcil de ser acionada. 
Peque uma borracha de 3/8 de polegada de diametro interno, 1/2 polegada de diametro externo e 
1/8 de polegada de espessura. Remova a parte de cima da tecla RESET como mostrado na Figura 
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FIGURA 2.9. Protegao contra RESET Acidental: Fase I. 



FIGURA 2.10. Protegao contra RESET Acidental: Fase II. 
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2.9. Coloque a borracha sobre a parte quadrada exposta da tecla como mostrado na Figura 2.10. 
Reponha a tampa da tecla. 


Voltando de um RESET 

0 que se pode fazer apos um RESET acidental depende do que se estava fazendo no instante em 
que o RESET ocorreu, e do tipo de Apple 11 que se esta usando. 

Qualquer programa usado, deve ter instrucoes especi'ficas sobre o que fazer no caso de acio- 
namento acidental do RESET durante a execucao do programa. Certifique-se disso antes de iniciar 
a execucao. Se a tecla RESET for acionada durante a execucao do BASIC, pode-se reiniciar o pro¬ 
grama desde o im'cio. Este e um pequeno consolo durante algumas fases de programas aplicativos, 
desde que reiniciar pode dar muita dor de cabeca. 

Quando se aciona o RESET, o Apple II para tudo o que estava fazendo. 0 controle retorna 
para o teclado; aparece o caractere de entrada e o cursor piscando na parte de baixo da tela. Se o 
programa e o BASIC pode-se voltar a execucao dando o comando RUN. Aquilo que foi processado 
antes do RUN provavelmente se perdera. 

Se for no Monitor ( *), pode-se voltar ao BASIC digitando-se CTRL-Ca menos que se esteja 
usando Applesoft baseado em disco ou cassette. Para sair do Monitor para Applesoft em disco, 
digite o seguinte comando do Monitor: 

#3006 

Para pular do Monitor para o Applesoft em cassette, use o seguinte comando do Monitor: 

PRECAUQAO: Certifique-se de que usou o comando correto. Se nao estiver certo sobre o que 
usar, pergunte a alguem mais experiente. Use o comando errado e estara perdido. 0 programa 
precisara ser recarregado, o Applesoft e possivelmente ate o DOS. 



Programando em Basic 


Este capi'tulo ensina como iniciar a execugao de seus proprios programas em BASIC no Apple II. 

0 BASIC e uma linguagem de programagao. Como outra linguagem do tipo, ela consiste num 
conjunto de comandos, que sao combinados para criar programas. Um programa define a tarefa 
que se deseja que o computador execute. 

Poderfamos ensina-lo a programar em BASIC, primeiro forgando o aprendizado de todos 
os comandos, um a um. Porem isso nao daria grande resultado, pois os comandos nao possuem, 
individualmente, muito significado. 0 estudo de comandos individuals de BASIC rapidamente se 
degenera em estudo de regras arbitrarias que nada dizem ou significam, em termos de progra¬ 
magao e pratica em construgao de programas. Assim, a definigao rigorosa de todos os comandos 
da linguagem BASIC foi deixada para o Capi'tulo 8. Va ao Capi'tulo 8 quandosentir necessidade, 
porem nao o leia sem ter aprendido os conceitos deste capi'tulo. 


INICIANDO COM BASIC 

Existem duas versoes diferentes de BASIC dispom'veis para o Apple II. Alguns modelos possuem 
o Integer BASIC, outros tern o Applesoft, e outros ainda dispoem de ambos. Por ora, nao se preo- 
cupe sobre que versao esta usando, se Integer BASIC ou Applesoft. Mais tarde, quando as diferen- 
gas se tornarem significativas, entraremos em mais detalhes. 


O Caractere de Entrada do BASIC 

0 Apple II e uma maquina multilingual. Se se deseja programar em BASIC, deve-se inserir instru¬ 
cts nessa linguagem. Existem instrugoes sobre como iniciar a operagao com o BASIC no Capf- 
tulo 2. Vamos fazer uma rapida revisao. 

No Apple II com o Monitor de ini'cio automatico, precisa-se apenas ligar a maquina e acio- 
nar o Reset ( Ctrl-Reset em algumas versoes do teclado). 

Se o seu Apple II nao tern infcio automatico, ligue-o e acione Ctrl-B e Return. 
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0 caractere de entrada a margem esquerda e o cursor informam em que posicao o BASIC 
se encontra. Se for Integer BASIC o caractere e ">", se Applesoft e " ]". 

MODO IMEDIATO E PROGRAMADO 


Antes de nos preocuparmos em como pular do Integer BASIC para o Applesoft e vice-versa, vamos 
dar uma olhada em comandos simples de BASIC que podem ser usados em ambas as versoes. 
Alguns dos exemplos deste capftulo usam Integer BASIC (>) enquanto outros usam o Applesoft 
( ]). Pode-se treinar os exemplos em ambas as versoes, nao importando a sua versao especffica, 
a menos que se especifique o contrario. Os exempios em que nao aparece o caractere de entrada, 
podem ser usados em ambas as versoes. 


IMPRIMINDO CARACTERES 

Quando se inicia pela primeira vez com a operagao do Apple II em BASIC, se esta no modo ime¬ 
diate, tambem chamado modo "direto" ou "calculadora". Neste modo, o computador responde 
imediatamente as instrugoes que recebe. Tente escrevendo o exemplo: 

PRINT -PROGRAMANDO EM MODO DIRETO" 

Nao se esquega de acionar a tecla RETURN, apos a ultima aspa. 0 Apple II imprime a seguinte 
mensagem: 

PROGRAMANDO EM MODO DIRETO 

Se e impressa a mensagem 7SYNTAX ERROR ou ***SYNTAX ERROR, isso esta dizendo que o 
comando nao foi entendido. Provavelmente houve erro de digitagao da palavra PRINT. Se for 
impresso apenas o numero 0 ao inves da mensagem, indica que se esqueceu de colocar a primeira 
aspa. Em ambos os casos pode-se redigitar o comando, porem com maiscuidado! Os computado- 
res sao muito meticulosos com sintaxe e pontuagao. Urn pequeno erro pode fazer o computador 
reclamar, ou pior ainda, fazer as coisas erradas. 

Urn comando como o acima faz com que o computador imprima tudo que estiver contido 
entre as aspas na tela do vi'deo. 

Existe urn limite para o tamanho da mensagem que pode ser colocada entre as aspas. 0 limite 
e diferente para o Integer BASIC e o Applesoft, mas em ambos os casos ele excede o tamanho da 
tela. Isso quer dizer que o comando pode ocupar mais de uma linha da tela. Os comandos de tama¬ 
nho grande automaticamente pulam para a linha de baixo da tela. Tente este exemplo: 

PRINT "SOB CIRCUNSTANCIAS NORMAIS? 0 HO 
MEN PODE SER C0N8IDERAD0 LOUCO" 

SOB CONDICOES NORMAIS 0 HOMEM PODE SER 


CONBIDERADO LOUCO 
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0 Integer BASIC permite ate 120 caracteres. Se este limite for excedido, aparece a mensa- 
gem *** TOO LONG ERR apos acionar o RETURN. 

0 Applesoft permite ate 255 caracteres. Quando se chega ao limite, o Apple II da urn bip. 
Quando o limite e excedido, o Apple II imprime uma barra (\) e automaticamente despreza a 
entrada, como se tivesse sido acionado o Ctrl-X. 


IMPRIMINDO CALCULOS 

Pode-se usar o Apple II em modo imediato como uma calculadora; ele responde diretamente com o 
resultado de calculos aritmeticos. Tente estes exemplos: 


PRINT 4+6 

•1 0 

PRINT 500-437 
63 

PRINT 100*23 
2300 

PRINT 94/12 
8 

PRINT 3*2 


Adigao 


Subtragao 


Multiplicacao 


Divisao 


Exponenciagao 


PRINT 3*4*10-BOO 
-600 


Combinagao 


A resposta correta se encontra na linha abaixo de cada um dos comandos. Veja que nao sao neces- 
sarias aspas nesses comandos. Sabe o que acontece se elas forem colocadas? Tente se nao souber. 

0 Integer BASIC tern um limite m^ximo e mi'nimo para o tamanho dos numeros nos calcu¬ 
los. Se o valor e maior que 32767, em qualquer ponto durante os calculos, aparece a mensagem 
*** >32767. Se o valor e menor que —32767, aparece a mensagem — *** >32767. Alguns exem¬ 
plos deste tipo de erro sao mostrados abaixo. 0 ultimo exemplo se refere a uma divisao por zero. 

>PRINT “32767-2 


-*** >32767 ERR 
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>PR I NT 2' N 1 5-1 
>32767 ERR 
>PRINT 10/0 
*** >32767 ERR 

As fracoes decimals nao sao permitidas no Integer BASIC. Assim, se for dada uma instrupao 
para divisao com resultado nao inteiro, o resto e desprezado. Por exemplo, teste este c^lculo: 

>PRi:NT 9/2 


4 

0 Applesoft permite operapao com fracion^rios. Os valores numericos podem ter ate nove 
dfgitos significativos, incluindo parte inteira e decimal. Isso quer dizer que numeros com mais de 
nove dfgitos sao arredondados para nove ou para o menor dfgito diferente de zero. Estes exemplos 
ilustram como ele opera: 

3 P R [ N f 1 2 3 4 56 7 89 6 Arredondado para ci ma 

12.345679 

3 P RIN T 1 2.3 456 7 8 9 4 Arredondado para baixo 

12.3456789 

Se for tentado algum calculo no modo imediato dentro do Applesoft, pode acontecer que o 
resultado venha em notapao cientffica. 

3 P R T. NT 1 234567891 23 
1" 23 4 5 6 739 E +11 

Se houver dificuldade em entender a notapao cientffica, fique com os calculos simples por enquan- 
to. Abordaremos mais detalhes sobre notapao cientffica e valores numericos ainda neste capftulo. 


Comando PRINT Abreviado 

0 Applesoft permite que se abrevie o comando PRINT com o ponto de interrogapao (?). Aqui 
estao alguns exemplos que podem ser tentados: 

3? "0 TEMPO PA98;V 
0 TEMPO PA88A 
']? 13-46*4 
■“ 2 6 3 
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MENSAGENS DE ERRO 

Dissemos antes que o Apple II emite varias mensagens de erro quando aparecem situagoes em que 
ele nao consegue operar. Ele gera o bip para chamar a atengao para o fato de que algo esta errado, 
e tenta diagnosticar o problema. Sua capacidade de diagnostico e limitada, de forma que nao se 
deve esperar uma analise definitiva sobre os erros. Existem cerca de 35 mensagens que o Apple II 
pode usar em resposta ao universo de erros e suas combinagoes. 

Ao longo deste capftulo e do resto do livro faremos mengao a alguns dos erros que podem 
ocorrer em situagoes especfficas, especialmente as mais comuns. Todas as mensagens de erro estao 
listadas em ordem alfabetica no Apendice C. 


Formato da Mensagem de Erro 

As mensagens de erro tern um formato ligeiramente diferente entre as duas versoes do BASIC, 
como mostrado abaixo: 

UPRNIT "A LAMA CORRE* 

?SYNTAX ERROR 


PRNIT "A LAMA CORRE" 

*** SYNTAX ERROR 

> 

ESPAQOS EXTRA EM BRANCO 

Se existe preocupagao quanto a questao de onde colocar espagos em branco, nao se preocupe. 
0 Apple II interpreta uma linha de comando BASIC pelos elementos nela colocados. Espagos, ou 
brancos, sao irrelevantes. 0 unico lugar em que deve ser colocado espago e dentro das aspas, onde 
se deseja espago como parte da mensagem. 


COMANDOS, LINHAS E PROGRAMAS 

Um programa consiste de um ou mais comandos que dao ao Apple II uma exata e completa defi- 
nigao da tarefa que deve ser executada. Se a tarefa e pequena e simples, o programa tambem sera 
pequeno e simples. As instrugoes de modo imediato que abordamos h3 pouco sao, de fato, peque- 
nos programas. Cada um tern apenas uma instrugao — um comando do Apple II. Sao casos triviais. 
Muitos programas tern 10, 100, 1000 ou ate mais comandos. Considere os seguintes comandos: 
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PRINT "RATOS" 

RATOS 

PRINT "COBRAS" 

COBRAS 

PRINT " E LAGARTOS" 

E LAGARTOS 

Cada um desses programas em modo imediato imprime uma linha na tela. Cada programa tem exa- 
tamente um comando e exatamente uma linha. 

0 Applesoft permite que se coloque mais de um comando em cada linha. Separam-se os co- 
mandos na mesma linha pelo sinal de dois pontos ( :). Compare este programa em modo imediato 
com o exemplo acima: 

] PRINT "RATOS"SPLINT "COBRAS "' PR INT " E 
LAGARTOS" 

RATOS 
COBRAS 
E LAGARTOS 

Este programa de tres comandos e uma linha imprime as mesmas tres linhas de texto dos tres pro¬ 
gramas independentes do exemplo anterior. 

Nao existe um limite especffico para o nOmero de comandos que se pode colocar numa linha 
do Applesoft. Lembre-se que uma linha nao pode ter comprimento superior a 255 caracteres. Se 
se digita uma linha muito longa, o computador comepa a emitir o bip a partir do caractere de 
numero 248 informando que esta chegando ao limite. Se o limite e atingido, a linha e automatica- 
mente cancelada, como se fosse digitado CTRL-X, e deve-se recomepar. Ele nao executa nenhuma 
das instrucoes colocadas naquela linha. Desta forma ve-se que existe um limite claro do que se 
pode fazer em uma linha de comando no modo imediato. 


Uma Linha de Comando no Applesoft 

Pode-se colocar um bocado de programa em uma linha dentro do modo imediato, grapas a habili- 
dade que o Applesoft tem em operar com mais de um comando dentro de cada linha de 255 carac¬ 
teres. Por exemplo, vejamos o exemplo abaixo: 

IFOR 1*1 TO 800 s?"A"? s NEXT s ACABOU ! " 

Sem saber o que este miniprograma faz exatamente, digite-o no teclado exatamente como 
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mostrado, finalizando com RETURN. Se a digitapao for feita corretamente, vai aparecer a letra A 
em 20 linhas de 40 colunas cada, seguida pela palavra ACABOU!, na 21? linha. 


aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa 

AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
ACABOU 1 


A linha de programa fica colocada no alto da tela do lado esquerdo. Isso porque o programa 
mostra urn numero de linhas suficiente para posicionar a linha no alto da tela, porem sem elimi- 
na-la. 

Quando o programa de uma linha descrito acima termina sua execupao, o caractere de 
entrada do Applesoft e colocado com o cursor a seu lado na linha de baixo da tela. 


MODO PROGRAMADO 

A forma de programapao apresentada acima e educacional, util e interessante; porem tern limi- 
tapoes serias, especialmente em Integer BASIC, com sua limitapao de um comando por linha. 
Outra desvantagem do modo imediato e que se deve redigitar o programa a cada vez que se deseja 
roda-lo. Existem algumas tecnicas avanpadas de edicao que veremos de forma rapida e que permi- 
tem usar novamente o programa no momento em que ele aparece na tela. Mas, de qualquer forma, 
este fato ainda e uma desvantagem. 

0 que se precisa e uma forma de se entrar com varias linhas de programa e mante-las dispo- 
nfveis de forma que se possa escrever rotinas que sao muito complexas para programas de apenas 
uma linha. 

Existe uma forma de contornar estes problemas que se verificam no modo imediato, que e 
escrever programas no chamado modo programado, tambem chamado indireto. No modo progra- 
mado, o computador aceita e guarda o programa em sua memoria, mas nao executa nenhuma 
das instrucoes mandadas ate que se de a ordem para executa-las. Pode-se colocar tantas linhas de 
programa quanto se desejar. Entao, entrando com a ordem apropriada, o computador executa a 
operapao especificada pelo programa entrado. 
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Execugao de Programa 

Dissemos que o computador executa ou roda um programa quando ele executa as operates espe- 
cif icadas por ele. 

No modo imediato, o programa e executado no momento em que se aciona a tecla RETURN. 
Em modo programado deve-se dar o comando RUN para executar o programa. Cada vez que 
se faz isso, o programa e executado novamente. 


Limpando Programas Velhos 

Devido ao Apple II guardar os programas na memoria dentro do modo programado, deve-se colo- 
car uma ordem especial para apagar os programas velhos antes de se executar a digitagao de um 
novo. Para fazer isso deve-se dar o comando NEW. Se esta ordem for esquecida, um novo programa 
entrado vai se misturar com o velho. 


Finalizando Programas Corretamente 

0 fim de um programa em modo imediato e obvio. Isso nao acontece no modo programado, como 
veremos. 0 comando END, dentro do programa diz ao BASIC para terminar a execugao do pro¬ 
grama e retornar ao modo imediato. Assim o comando END deve ser o ultimo comando dentro de 
um programa a ser executado. 

0 Applesoft nao requer o comando END. Ele finaliza o programa automaticamente apos 
executar todas as instrugoes colocadas. 


Numeros de Linha 

Os numeros de linha tornam o modo programado possfvel. Um numero de linha e simplesmente 
um numero de um, dois, tres, quatro ou cinco dfgitos, digitado no infcio de uma linha de coman¬ 
do. Este numero de linha e a unica diferenga que existe entre uma instrugao no modo programado 
e imediato. Existem algumas instrugoes que so podem ser usadas no modo imediato e outras que 
so se usam no modo programado; isso sera visto mais tarde em detalhes. 

Vejamos um exemplo de programagao em modo programado: 

> NEW 

MO PRINT MODO DIA, CODA MORA" 

>20 END 
>RI.JN 


TODO DIA? TODA MORA 

Cada numero de linha deve ser unico. Nao pode haver duas linhas em um programa com o 
mesmo numero. Se isso for feito, o computador guarda a dltima linha digitada. Para ver isso colo- 
quemos o seguinte programa: 
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> NEW 


>10 PRINT 

"PRIMEIRA LINHA 

>10 PRINT 

"SEGUNDA LINHA 1 

>20 END 


> R UN 



BEGUNDA LINHA 10 

Os numeros de linha determinam sequencia das linhas de programa dentro do BASIC. A 
primeira linha deve ter o numero menor, enquanto que a ultima deve ter o numero maior. Mesmo 
digitando as linhas fora de ordem, o Apple II rearranja as linhas na sequencia pelos numeros das 
linhas. Vejamos um programa, com os numeros das linhas fora de ordem: 

> NEW 

>30 PRINT 

>10 PRINT 
>20 PRINT 
>40 PRINT 
>50 END 

> RUN 

DEZ 
UINTE 
TRINTA 
QUARENT A 

Para provar que o Apple II nao perdeu o programa colocado dentro do modo programado, 
limpe a tela com o comando Esc-@ e mande rodar o programa novamente. 

> -— Acione Esc-@ e RETURN 

>RUN 
DEZ 
UINTE 
TRINTA 
DUARENTA 

Pode-se adicionar comandos a um programa que esteja dentro da memoria do computador. 
Elas podem ser adicionadas no infcio, no fim ou em qualquer parte do meio do programa colo- 
cando o numero de linha que vai posicionar a instrucao onde ela e necessaria. Vamos supor que se 
deseja colocar uma linha no infcio do programa acima. Como nao foi dado o comando NEW, o 


"TRINTA" 

" DEZ" 

"UINTE" 
"QUARENTA 
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programs ainda est3 dentro da memoria do Apple II. Como a menor linha de programs no exem- 
plo e 10, qualquer comando com numero de linha inferior a 10 sera colocado no im'cio do progra¬ 
ms. Vejamos: 

>3 PRINT "CINCO" 

>RUN 

CINCO 
DEZ 
VINTE 
TRINTA 
0UARENTA 

E uma boa pratica comegar o programs original com o numero de linha 10 ao inves de 0! 
Recomenda-se iniciar o programs com um numero de linha urn pouco alto e pular numeros entre 
uma linha e outra, de forma a deixar espago para a digitagao de outras linhas que forem necessa- 
rias, mais tarde. 


Linhas de Programs Multi instrugao 

Pode-se colocar mais de uma instrugao dentro de uma linha de programs. 0 primeiro comando 
segue o numero da linha. A segunda instrugao segue a primeira com o caractere dois pontos ( :) 
entre as duas. Este sinal ( :) separa as instrugoes dentro de uma linha de mais de uma instrugao. 

O Integer BASIC permite que se coloque mais de uma instrugao em cada linha dentro do 
modo programado, o que nao acontece no modo imediato. O comprimento de cada linha e de 
aproximadamente 150 caracteres. O comprimento exato varia de acordo com o conteudo da linha. 
Se e digitada uma linha muito extensa, o Apple II apresenta a mensagem *** TOO LONG ERR, 
e a linha deve ser redigitada. 

No Applesoft sao permitidas linhas de multiinstrugao tanto no modo imediato quanto no 
programado. Em ambos o comprimento m^ximo e 255 caracteres, como \i foi dito. 


Listando as Linhas de Programa 

Pode-se ver as linhas de programa que o computador guardou dentro da memoria digitando-se o 
comando LIST. Tente agora. Se nao foi digitado NEW depois do ultimo exemplo, pode-se ver as 
linhas de comando do programa anterior mostradas na tela: 


LIST 



c; 

PRINT 

"CINCO" 

10 

PRINT 

"DEZ" 

20 

PRINT 

"UINTE" 

30 

PRINT 

"TRINTA" 

40 

PR INI- 

"QUARENTA" 

00 

END 
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Isso se chama listagem do programs. Existem variagoes do comando LIST que permitem listar uma 
unica linha do programa ou um conjunto delas. Esta ultima opgao e util quando se tem programas 
longos cujas listagens nao cabem na tela de uma so vez. Com o exemplo de cima, tentemos o 
comando: 


LIST 10 

Ele causa o aparecimento de: 

10 PRINT " DE.Z" 

Para listar varias linhas em seqiiencia, deve-se especificar as linhas inicial e final no comando, 
como neste exemplo: 

LIST 20,40 

20 PRINT "V INTEL'" 

30 PRINT "TRINTA" 

40 PRINT "QUARENTA" 

Em Applesoft pode-se listar todas as linhas de programa ate uma especificada, inclusive. 
Pode-se tambem iniciar a listagem numa linha especffica e ir ate o fim do programa. Aqui estao 
exemplos das duas variagoes do comando LIST: 

] LIST,IQ 
5 PRINT "CINCO" 

10 PRINT "DEZ" 

“JL.IST30, 

30 PRINT "TRINTA" 

40 PRINT "QUARENTA" 

50 END 

Interrompendo a Listagem 

Pode-se parar a listagem antes que ela termine digitando-se CTRL-C. Isso e especialmente util para 
interromper listagens interminaveis quando o programa e muito grande. 

Se o Apple II tem o Autostart Monitor, pode-se suspender, ou parar temporariamente a 
execugao da listagem digitando-se CTRL-S. Ela continuara a ser executada com o acionamento da 
barra de espago. 0 Ctrl-S permite que se veja um trecho de listagem do programa de cada vez. 


Numeragao Automitica de Linha 

O Apple II automaticamente renumera as linhas de programa do Integer BASIC. Usa-se o comando 
AUTO para realizar esta operagao. Desta forma o computador vai fornecendo o proximo numero 
de linha a cada vez que se aciona a tecla RETURN. Ele nao avanga para a proxima linha se encontra 
um erro na linha terminada, ou ate que se acione a tecla RETURN. 

Para sair da numeragao automatica de linhas, digita-se Ctrl-X. Isso cancela a insergao de 
numeros de linha pelo computador. Em seguida, digita-se o comando MAN. 
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Para ilustrar como os comandos AUTO e MAN funcionam, vejamos o exemplo: 

>AUTO 1000 

>1000 PRINT "QUANT AS JAR DAS TEH IJHA MILHA?" 

> 1 01 0 Acione apenas RETURN 

>1010 PRINT 5280/3 

*** SYNTAX ERR 

>1010 PRINT 5280/3 
>1020 ‘ Acione CTRL-X 

> HAN 


Como se pode ver no exemplo, o AUTO exige que se informe a partir de que linha deve 
comecar a numeragao automatica. Pode-se especificar tambem o incremento a ser dado entre cada 
linha. O exemplo abaixo ilustra essa opgao. 

>AUTO 1000,100 

>1000 PRINT "SER 00 NAO SER" 

>1100 \ Acione CTRL-X 
> MAN 

Neste exemplo, os numeros das linhas tern incremento de 100. Se for omitido o incremento, o 
Apple II utiliza 10 como visto no exemplo anterior. 


GUARDANDO PROGRAMAS EM CASSETTE 

Urn gravador cassette fornece meios de guardar urn programa introduzido no modo programado 
fora do computador e mais tarde carrega-lo de volta na memoria. Suponha que se tern o seguinte 
programa na memoria: 

10 PRINT "HUITA" 

20 PRINT "BANANA" 

30 PRINT "POR" 

40 PRINT "UM" 

SO PRINT "TOSTAO" 

40 END 

Para salvar este programa, coloque uma fita cassette no gravador. Rebobine ate o infcio, acione os 
botoes de RECORD e PLAY simultaneamente no gravador cassette e digite o comando seguinte 
no teclado: 


save: 

0 Apple II vai dar urn bip quando iniciar a gravagao do programa em fita e outro quando terminar. 
Aperte o botao STOP no gravador apos ouvir o segundo bip. 
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Nesse ponto digite NEW seguido de LIST para limpar o programa da memoria principal e 
verificar que ele se foi. Para carregar o programa de volta da fita para a memoria, primeiro rebobine 
a fita ate o infcio. Acione entao o botao PLAY do gravador cassette e digite o seguinte comando 
no teclado: 


LOAD 

0 Apple II toca urn bip no instante em que inicia a leitura do programa da fita para a memoria e 
outro quando termina a leitura. Deve-se parar manualmente o gravador apos ouvir o segundo bip. 
Use o comando LIST para verificar se o programa esta dentro do computador. 

No Capftulo 5 veremos como guardar e carregar programas no disco, que e mais conveniente 
que o cassette. 


Guardando Varios Programas em Uma Unica Fita 

Como se pode ver executando o exemplo acima, nao e necessario muita fita para se guardar urn 
programa. Os programas maiores requerem mais fita, porem em geral existe espago em um cassette 
para se guardar varios programas em BASIC. Pode-se guardar os programas em forma sequencial 
numa fita: o segundo apos o primeiro, o terceiro depois do segundo etc. 

Carregar o segundo, terceiro, quarto e subsequentes programas do cassette nao e uma tarefa 
direta, como e o primeiro. Apos rebobinar a fita ate o infcio, deve-se passar o primeiro programa 
para acessar o segundo, passar o segundo para acessar o terceiro e assim por diante. Pode-se obter 
isso dando o comando LOAD repetidas vezes ate que o programa desejado seja lido para a memo¬ 
ria. Esse e um processo demorado, mas funciona. 

Pode-se aumentar a velocidade consideravelmente se o gravador cassette tiver um contador 
de fita. Reinicie o contador para 0 quando rebobinar totalmente a fita. Apos gravar o primeiro 
programa anote o numero indicado no contador de fita. Essa sera a posicao inicial para leitura do 
segundo programa. Grave o segundo programa e anote a leitura do contador de fita no final da 
gravagao (sera a posigao inicial de leitura do terceiro programa). 

Agora, para carregar o segundo programa, rebobine a fita ao infcio e zere o contador. De 
avango rSpido na fita com o botao FAST FORWARD ate posicionar o contador de fita no infcio 
do segundo programa. Pode-se usar o botao REWIND para voltar a fita se ela avangou demais. 
Agora basta usar o comando LOAD para ler o segundo programa. 


TROCANDO DE BASIC 


Em varias versoes do Apple II, pode-se escolher entre programar em Integer BASIC ou Applesoft. 
As razoes de se trocar um BASIC por outro ficarao claras no decorrer deste capftulo. Ja vimos, por 
exemplo, que^ o Integer BASIC proporciona numeragao automatica de linhas, o que o Applesoft 
nao faz. Por outro lado, o Applesoft permite trabalhar com valores numericos fracionarios, e o 
Integer BASIC nao. 

Muitas versoes do Apple II operam ambos os BASIC's, porem nem todas. 0 Apple II stan¬ 
dard, por exemplo, tern apenas o Applesoft. 0 processo para trocar de uma versao do BASIC 
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para outra varia de acordo com o modelo de Apple II utilizado, e dos opcionais que estaoconec- 
tados nele. 

Com o Language System da Apple, tem-se acesso imediato a ambas as versoes do BASIC. 
Estando em Integer BASIC digite FP para passar para Applesoft. Dentro do Applesoft digite I NT 
para acessar o Integer BASIC. 

0 cartao com o Applesoft em "firmware" tambem per mite acesso imediato a ambas as 
versoes do BASIC. Ele tern uma chave que se acessa atraves do slot atras do Apple II e determina 
a versao do BASIC. Ligando-se o computador com a chave para baixo, acessa-se o Integer BASIC. 
Com a chave para cima, ao se ligar o Apple II acessa-se o Applesoft. Fora o posicionamento da 
chave, pode-se digitar FP para acessar o Applesoft e INT para acessar o Integer BASIC se o cartao 
estiver instalado. 

No Apple II standard e facil acessar o Integer BASIC. Acione a tecla RESET e digite CTRL-B. 
Nesta versao do Apple 11 e mais dif fcil se ter o Applesoft, uma vez que o programa vem em fita ou 
disco. Deve-se fornecer as instrucoes necessarias para ele carregar o Applesoft da fita ou do disco. 

Antes de se usar o drive de disco deve-se dar o boot do Sistema Operacional em Disco (DOS) 
como foi descrito no Capftulo 2. Deve-se fazer isso a cada vez que se liga o computador. Para 
repassar rapidamente, estas sao as instrugoes para dar o boot do DOS no Monitor e no Integer 
BASIC. 


*6 Acione Ctrl-P e Return 

> P ft # 6 

Uma vez dado o boot, pode-se colocar o Apple II no Applesoft a partir do Integer BASIC, 
colocando o disco com o Applesoft no drive de disco e digitando FP. Em poucos segundos o carac- 
tere de entrada do Applesoft (]) aparece na tela. 

Pode-se tambem ter o Applesoft em fita. 0 processo completo para sua leitura e descrito no 
Capftulo 2. Em resumo, deve-se por o cassette com o Applesoft no gravador cassette, acionar a 
tecla PLAY e dar o comando LOAD dentro do Integer BASIC. Em 1 a 2 minutos, aparece a nota 
de Copyright e o caractere de entrada na tela. 

Dentro do Applesoft, pode-se voltar ao Integer BASIC digitando o comando INT. Caso se 
deseje voltar ao Applesoft, usa-se o comando FP com o drive de disco, ou o LOAD com a fita 
cassette. 


TECNICAS AVANCADAS DE EDICAO 


No Capftulo 2 vimos algumas formas de corrigir erros durante a digitagao da linha de comando, 
antes do acionamento da tecla RETURN. Vamos, rapidamente, rever as tecnicas apresentadas. 

A tecla <- volta o cursor de urn espago e limpa o caractere passado. Os caracteres sao elimi- 
nados da linha de programa, ainda que continuem aparecendo na tela. 

A tecla move o cursor para a frente, copiando (reentrando) o caractere passado. 
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A tecla REPT, usada em conjunto com as teclas «- e permite a ida para a frente e para 
tras mais rapidamente. 

O comando Ctrl-X cancela a linha que esta sendo digitada. 

0 comando Esc-@ limpa a tela e coloca o cursor na linha superior a esquerda. 

Vamos agora ver outras formas de editar linhas de programa. Estes novos metodos sao parti- 
cularmente uteis quando se deseja modificar as instrugoes no modo programado (ou seja, aquelas 
com numero de linha). 


ELiMINANDO LINHAS DE PROGRAMA 

Para eliminar uma linha inteira, digite seu numero seguido imediatamente pela tecla Return. Ao 
listar o programa, nota-se que tanto o numero da linha quanto o seu conteudo nao mais fazem 
parte do programa. Aqui esta um exemplo: 


>NEU 


>100 PRINT " 

MEU CORACA0" 

>110 PRINT " 

NAO 3EI PORQUE 

>120 PRINT " 

BATE EELXZ" 

>130 PRINT " 

QUANDO TE ME" 

>140 END 


>110 


>130 


> L. IS T 


100 PRINT 

"MEU CORACAO" 

120 PRINT 

"BATE FEL.IZ" 

140 END 



Pode-se usar o comando DEL para eliminar um bloco de linhas de programa. Por exemplo: 

> DEL. 110/140 


> LIS T 


100 PRINT "MEU CORACAO" 

0 comando DEL 110,140 eliminou todas as linhas de programa, iniciando na linha 110 e termi- 
nando na 140. Mesmo que a linha 110 nao exista, todas as linhas entre 110 e 140 sao retiradas. 


ACRESCENTANDO LINHAS DE PROGRAMA 

Pode-se acrescentar novas linhas de programa em qualquer ordem, a qualquer tempo. Seus numeros 
de linha vao determinar a posigao que ocuparao no programa. O Apple II automaticamente ordena 
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as novas linhas e aquelas ja existentes na memoria. Adicionemos as linhas 110, 120 e 130 no 
exemplo acima. 


> 110 

PRINT 

• 1 20 

PRINT 

>130 

END 

>LIST 


100 

PRINT 

110 

PRINT 

1 20 

PRINT 

130 

END 


NA0 St-I P OR QIJE" 
BATE FELIZ" 


"MEU CORACAO" 

"NAO SEI PORQUE 

"bate: feliz - 


ALTERANDO LINHAS DE PROGRAMA 

A forma mais simples de se alterar uma linha de programa e redigita-la. Essa nao e uma boa solugao 
por varios motivos. Redigitar e uma tarefa que consome bastante tempo e as chances de se errar na 
digitacao sao grandes. Felizmente ha uma maneira de se modificar as linhas de programa que estao 
na memoria sem ter que redigita-las. A forma pela qual se permite isso, existente tanto no Integer 
BASIC quanto no Applesoft, tern como base o fato de que tudo que e mostrado na tela esta vivo. 
Pode-se editar qualquer coisa que esteja na tela. Usando a tecla Esc em conjunto com varias outras 
teclas, pode-se mover o cursor ao longo de todas as posicoes da tela. Isso faz com que se possa 
mover o cursor para o infcio de qualquer linha que esteja presente na tela. Pode-se entao usar a 
tecla -► para copiar as partes nao modificadas do programa. Pode-se substituir, inserir ou eliminar 
caracteres em qualquer ponto da linha. 

Aqui esta como isso funciona. Primeiro usa-se o comando LIST para fazer aparecer na tela 
aquilo que se quer modificar. Perceba que o comando LIST coloca espagos extra, quando mostra 
as linhas de programa. (Para tornar o programa mais legfvel.) Esses espagos extra podem tornar 
mais dif fceis de editar linhas de programa muito longas. Para livrar o comando LIST desses espagos 
extra que podem causar problemas na edigao, limpe a tela (usando Esc-@) e digite o seguinte 
comando misterioso: 


POKE: 33/33 

Alem de suprimir os espagos extra em branco, este comando faz reduzir o tamanho da tela 
de 40 para 33 caracteres. Veremos o comando POKE em mais detalhes no Capftulo 4. Para fazer 
voltar a tela ao seu tamanho normal, digite: 

POKE: 33 / 40 


Movendo o Cursor 

Para mover o cursor pela tela, deve-se acionar duas teclas em sequencia. Primeiro acione ? tecla Esc 
e depois A, B, C e D, toda vez que desejar colocar o cursor uma posigao para a direita, esquerda, 
cima ou baixo. A Figura 3.1 ilustra como as quatro possibilidades afetam o movimento do cursor. 
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FIGURA 3.2. Movimento do Cursor (Versao Monitor Autostart). 


Com o Autostart Monitor, pode-se usar ainda as teclas I, J, K e M em conjunto com Esc para 
mover o cursor. Pela forma como essas letras estao situadas no teclado, elas formam um painel de 
controle direcional, como mostrado na Figura 3.2. 

Existe uma importante diferenpa na forma como a tecla Esc opera com I, J, K e M. Acione 
Esc e o Apple II vai para o modo de edigao. Acione entao I, J, K ou M para mover o cursor ao 
largo da tela — sem necessidade de acionar Esc toda vez. 0 Apple 11 fica no modo edipao enquanto 
se acionar qualquer uma das teclas I, J, K, M ou REPT. Isso permite mover o cursor em mais de um 
espapo sem ter necessidade de digitar o Esc a cada vez. Para sair do modo de edipao, aciona-se 
qualquer tecla que nao seja I, J, K, M, REPT, CTRL ou SHIFT. 

Pode-se usar a tecla REPT para fazer o cursor se mover longas distances na tela com pouca 
digitapao. 


Trocando Caracteres 

Trocar um caractere por outro e simples. Posiciona-se o cursor sobre o caractere a ser trocado e 
digita-se o substituto sobre ele. Por exemplo, com o cursor posicionado no exemplo abaixo: 
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•100 PRINT "TEMPO ESTIMADO DE j$IEGADA" 

pode-se digitar DESEMBARQUE, obtendo-se: 

100 PRINT "TEMPO ESTIMADO DE DESEMBARQUE"t3 

Adiciona-se RETURN para efetivar a modificagao. 


Eliminando Caracteres 

Pode-se efetivamente eliminar caracteres individuals colocando-se espagos em branco sobre eles. 
Deve-se lembrar que no BASIC os espagos em branco nao tern maior significado, a menos que 
estejam entre aspas, quando fazem parte de textos. Pode-se usar as teclas Esc e A (a tecla K no 
modo edigao) para mover o cursor para a frente. Diferentemente da tecla as teclas Esc-A 
e Esc-K nao recopiam os caracteres que sao passados. Se os caracteres que se deseja eliminar 
estiverem dentro de aspas, sera mais fScil usar as teclas Esc e A ou J no modo edigao, para eliminar 
os caracteres indesejados. 

Para limpar todos os caracteres a partir da posicao do cursor ate o fim da linha mostrada, 
aciona-se Esc seguido de E. Isso tern o mesmo efeito de se acionar a barra de espago repetidamente 
ate o fim da linha, porem o cursor nao se move. Os caracteres da proxima linha nao sao limpos, 
mesmo se fizerem parte da mesma linha de programa. Por exemplo, se for acionado Esc e E tendo- 
se o cursor posicionado como abaixo: 

100 PRINT "GUEM NUNCAC1 COMEU MEL ADO r QIJ 
ANDO come: SE L..AMBUZA" 


resulta em: 


100 PRINT "QIJEM NUNC At 3 
ANDO COME SE LAMBUZA" 

Cuidado! Se o Return for acionado agora, a linha 100 ficara terminada exatamente onde esta 
o cursor. Use a tecla -► para copiar o resto da linha. 

Pode-se tambem limpar todo o texto da posigao do cursor ate o fim da tela. Para isso, deve-se 
acionar Esc e F. 


Inserindo Caracteres 

Inserir caracteres numa linha e simples. Pode parecer confuso de infcio porque o resultado final 
nao e aparente. 0 Apple II nao pode abrir espago entre caracteres para gerar area de insergao. 
A Figura 3.3 mostra como o Apple II permite insergao de letras. Insere-se o texto sobre a linha 
com a ajuda dos movimentos do cursor (Esc etc.). 0 que se deve lembrar e que o que estci mostra- 
do na tela nao e uma replica do que existe na memoria do computador. 

Temos aqui urn exemplo de edigao que ilustra a insergao de caracteres. 0 exemplo usa o 
Integer BASIC (>) porem opera corretamente tambem no Applesoft. Vejamos a seguinte linha de 
programa: 
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AUTO 


10 PRINT "VENDE-SE ESTE MOVEL" 


FIGURA 3.3. Inserpao de Caracteres 


>neu 

>10 PRINT "VENDE-SE ESTE HOVEL* 

>C3 

Para inserir a palavra AUTO, na frente da palavra movel, primeiro listemos o programa: 

>LIST 

10 PRINT "VENDE-SE ESTE MOVEL" 

> i: i 

Usando apenas as teclas de movimentapao do cursor (Esc etc.), posiciona-se o cursor exatamente 
sobre o primeiro dfgito do numero da linha, como segue: 

>LIST 

c: i ::i o p r i n t " v e n d e - s e e s t e m o v e l " 

> 

Usa-se agora a tecla -► para copiar a primeira parte da linha, parando em M. 

>LIST 

10 PRINT "VENDE-SE ESTE CM30MEL" 

> 

Aciona-se a tecla Esc seguida por D para mover o cursor uma linha para cima. (Se houver carac- 
teres do lado direito do cursor nessa linha, pode-se limpa-los com o acionamento das teclas Esc 
e E.) 

>list r; i 

10 PRINT "VENDE-SE ESTE HOVEL" 

Digita-se a palavra AUTO 

>L 1ST AUTOU 

10 PRINT "VENDE-SE ESTE MOVEL" 

> 

Usando apenas os movimentos do cursor, posiciona-se o cursor sobre a primeira letra do texto 
a ser inserido. Nao se deve usar a tecla «- para voltar o cursor. Embora parepa que ela faz a mesma 
coisa que Esc-B e Esc-J, a tecla <- realmente limpa os caracteres que passam; ela iria eliminar a 
inserpao! 
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>LIST CA3UT0 

1G PRINT "VENDE-SE ESTE MO MEL" 

> 

Acione a tecla Esc seguida pela tecla C para retornar o cursor a linha de programa original. 

>LIST AUTO 

10 PRINT "UENDE-SE ESTE EM I! DUEL" 

> 

Finalmente use a tecla -► para copiar o resto da linha. Entao acione RETURN. Mostre a nova linha 
com o comando LIST. 

H..T.ST AUTO 

10 PRINT "MENDE-SE ESTE MOMEL" 

>1.1ST 10 

10 PRINT '"MENDE-SE ESTE AUTO MOM EL." 

>C3 

0 Apendice B eontem uma tabela de referenda para os comandos de edipao. 


REEXECUTANDO EM MODO IMEDIATO 

0 fato de que tudo que aparece na tela do Apple II esta vivo permite que se execute qualquer 
comando colocado em modo imediato, desde que ainda seja visfvel na tela. Pode-se executar urn 
comando em modo imediato da forma como estS, ou ainda pode-se editS-lo. 

Em ambos os casos, a primeira coisa a fazer e posicionar o cursor sobre o infcio da linha 
de modo imediato. Use as teclas Esc e A, B, C ou D alternativamente como mostrado acima (ou 
Esc seguida por I, J, K ou M se estiver com Autostart Monitor). Use entao a tecla -> para copiar 
a instrupao de modo imediato. Pode-se fazer modificapoes na linha, usando as tecnicas mostradas 
acima para trocar, retirar ou inserir caracteres na linha. 

Para ver como isso funciona, observemos o programa em modo imediato abaixo, quecalcula 
o espapo, em pes cubicos, de uma area de 10 X 25 X 8 pes. 

>PR INT "ESPAGO « 10*25*8 

ESPAGO * 2000 

Pode-se mudar facilmente este programa para calcular o espapo de ambientes de diferentes tama- 
nhos. Para mudar as dimensoes para 10 X 25 X 14, por exemplo, primeiro deve-se posicionar o 
cursor no infcio da linha de programa em modo imediato. (Alternadamente, acione Esc e D tres 
vezes). Acione e segure a tecla -► acionando e mantendo a tecla Rept. 0 cursor ira para a frente 
ao longo da linha de programa. Solte ambas as teclas quando o cursor chegar ao dfgito 8. Se ele 
for passado ou nao tiver chegado, devido a se ter soltado as teclas antes ou depois, pode-se mover 
o cursor para a frente ou para tras um caractere por vez com as teclas «- e Pode-se tambem 
mover o cursor do infcio ate o 8 acionando a tecla -* repetidamente varias vezes, ao inves de usar 
o REPT e -+ em conjunto. 
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Com o cursor posicionado sobre o 8, digite a nova dimensao de 14 e acione RETURN. 

>PR I NT "ESPAGO = "?10*25*14 
ESPAGO * 3500 

LINGUAGEM DE PROGRAMACAO 


Uma linguagem de programagao e o meio de comunicagao pelo qual podemos falar com o compu- 
tador. Existem muitas linguagens diferentes de programagao. Algumas, como o BASIC, sao de 
aplicacao geral, outras sao orientadas para tornar a execugao de programas mais facil dentro de 
areas especi'ficas, como area comercial, cientffica, graficos, manipulagao de textos, calculos etc. 
As linguagens de programagao sao tao diferentes quanto as linguagens faladas. Alem do BASIC, 
outras linguagens de programagao comuns sao Pascal, C, FORTRAN, COBOL, APL, PL/M, PL/1 
e FORTH. 

Os computadores Apple II podem usar varias linguagens de programagao, dentre elas o 
BASIC e o Pascal. Este livro se concentra no uso do BASIC com o Apple II. 

Nao importando qual a linguagem de programagao, todo o comando deve ser dado seguindo 
urn conjunto de normas bem definido. Estas regras, no conjunto sao chamadas de sintaxe. Cada 
linguagem diferente tern sua propria sintaxe. 

As linguagens de programagao, como linguagens faladas, tern dialetos. Os diaietos sao varia- 
poes menores da sintaxe. 0 Apple II tern dois dialetos do BASIC, o Integer BASIC e o Applesoft. 
Devido as diferengas entre os dois dialetos, urn programa escrito para um dialeto pode nao rodar 
no outro. Alem disso, um programa escrito para o Apple II pode nao rodar em outro computador, 
mesmo que esse outro computador tambem execute o BASIC. Entretanto, aprendendo a progra- 
mar o computador Apple II em BASIC, qualquer que seja o dialeto, faz com que nao se tenha 
grande dificuldade em se trabalhar com qualquer outro dialeto. 

Algumas regras sintaticas de linguagens de programagao sao obvias. Os exemplos de adigao 
e subtrapao no im'cio deste capftulo sao exemplos de sintaxe obvia. Nao e necessario ser progra- 
mador para entende-las. Porem outras regras de sintaxe sao arbitrarias e sem sentido, a men os que 
se conhega a sintaxe. Nao se pode procurar racionalizar as regras de sintaxe; usualmente nao ha 
racionalidade. Por exemplo, por que usar * para representar multiplicagao? Normalmente se 
usaria o X para multiplicagao. Porem o computador nao teria meios de diferenciar o X que repre- 
senta multiplicagao do que representa a letra X. Assim, mais recentemente todas as linguagens 
de programagao tern optado pelo asterisco ( * ) para representar a multiplicagao. A divisao e 
universalmente representada pelo si'mbolo /. Nao existe razao real para esta opgao; o sinal de 
divisao (-5-) nao esta presente no teclado do computador, de forma que outros caracteres devem 
ser escolhidos. 


ELEMENTOS DE BASIC 


Muitas das regras basicas de sintaxe do BASIC se referem a comandos individuals. A sintaxe dos 
comandos BASIC distribuem-se separadamente pelos seus tres grupos: numeros de linhas, instru- 
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goes ao computador e dados. Descreveremos cada uma a seu tempo. Existem ainda umas poucas 
regras que se referem ao programa como um todo, como a ordem dos comandos. Abordaremos 
essas regras nos pontos apropriados no decorrer deste capi'tulo. 


REPASSANDO A NUMERAQAO DE LINHAS 

Ja falamos sobre a numeragao das linhas com alguma profundidade. Apos uma breve revisao, 
entraremos em mais detaihes. Em modo programado, toda a linha de programa em BASIC deve 
ter um unico numero de linha. Os numeros de linhas determinam a sequencia das instrugoes 
dentro do programa; o comando com o menor numero sera o primeiro do programa e o de maior 
numero sera o ultimo. 

0 Integer BASIC permite numeros com de 1 a 5 dfgitos com numeros inteiros variando de 


0 a 32767. 


0 Applesoft permite numeros de 1 a 5 dfgitos com valores inteiros entre 0 e 63999. 

Numeros de Linha como Enderego 

Em essencia, os numeros de linha sao uma maneira de enderegar as linhas de programa. Este e um 
conceito importante, desde que todo o programa tern dois tipos de comandos: 

1. Comandos que criam ou modificam dados, e 

2. Comandos que controlam a sequencia em que a operagao e executada. 

A ideia de que a operagao especificada pelo programa deve ser executada numa sequencia 
bem definida e um conceito bastante simples. Normalmente, a execugao do programa inicia e 
continua sequencialmente, como ilustrado abaixo: 


Infcio— 



Logo descobriremos que muitos programas contem seqiiencias de execugao essencialmente nao- 
seqiiencial. Isso faz com que os numeros de linhas se tornem importantes, porque se pode usar o 
numero da linha para identificar uma troca na sequencia de execugao. Isso pode ser ilustrado 
como segue: 
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Irn'cio— “ ^ 



GOTO 70 



etc. 


ESPAQOS EM BRANCO 

De forma geral, podem-se usar espagos extra em branco livremente para melhorar a legibilidade do 
programa. Porem, como cada espago extra em branco ocupa espago extra de memoria, o Apple II 
coloca os espagos em branco nao necessarios para fora da linha de programa quando ela e entrada 
(e aciona-se RETURN). Assim, quando se listam linhas de programa com o comando LIST, o 
Apple II coloca espagos em branco nos lugares apropriados para aumentar a legibilidade, de acordo 
com determinagoes anteriores. Nao se deve esquecer que e possfvel suprimir essa colocagao de 
espagos com o comando TEXT ou digitando POKE 33,33 antes de dar o comando LIST. Um 
POKE 33,40 faz a tela voltar ao original. 

Deve-se ter cuidado ao usar espagos extra dentro de aspas. Compare os dois comandos abai- 
xo, por exemplo: 


PRINT "COLO QUE'. OS DADOS IN I Cl A IS 
C0L0QUE OS DADOS INIC.IAIS 


T " C0L0QUE OS DADOS I NICIA IS 

CO 1.0 QUE OS DADOS T. NIC IA IS 


PR TNT 


DADOS 


A principal atividade do computador e entrar, manipular e expelir dados. Por isso, a forma como a 
linguagem de programagao manipula dados, sejam numeros ou texto, e um parametro muito 
importante. Descreveremos agora os tipos de dados que se podem encontrar em programas no 
Apple II. 

Cordoes (Strings) 

Um cordao e um caractere ou uma seqiiencia de caracteres dentro de aspas. Usamos cordoes com 
o comando PRINT para as mensagens que aparecem na tela. Aqui estao mais alguns exemplos de 
cordoes: 
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"DIGITE OS DADOS” 

"CONTA NUMERO 105.443-4” 

"PEDRO ALVARES CABRAL” 

"LARGO DA CONCORDIA” 

"SAO PAULO, 10 DE DEZEMBRO DE 1954" 

Com apenas algumas excegoes, um cordao pode conter qualquer caractere que se possa 
entrar via teclado usando o alfabeto normal e as teclas numericas, com ou sem Shift ou Ctrl. 
As excegoes sao -»■, RETURN, Esc, CTRL-H, Ctrl-M, Ctrl-U e CTRL-X. Essas excegoes ou 
movem o cursor dentro da tela ou finalizam a entrada, ou ambos. 

Os cordoes podem ter comprimento de 0 a 255 caracteres. Um cordao sem nenhum carac¬ 
tere 6 chamado cordao nulo. 

Existem alguns caracteres invisfveis que podem ser produzidos acionando certas combi- 
nagoes de teclas. Por exemplo, acionando-se CTRL e G simultaneamente, o computador sera o bip. 
Pode-se colocar essa combinagao dentro do cordao. Tente usa-la dentro de um comando PRINT. 

P R X H f " v Acione Ctrl-G varias vezes entre as aspas 

Neste exemplo, pode-se ouvir o caractere embora nao se possa ve-lo. Existem outros caracteres 
que sao invisfveis e inaudfveis. Tais caracteres sao usados para controlar fungoes da impressora, 
perifericos de comunicagao e outros componentes que se podem conectar ao Apple II. 

0 Apendice I lista o conjunto completo de caracteres do Apple II e informa que teclas 
geram qual caractere. 

Em Applesoft existe uma maneira pela qual se pode incluir, dentro de um cordao, carac¬ 
teres que nao podem ser gerados pelo acionamento de teclas. Isso e feito com a fungao CHR$, 
descrita adiante no Capftulo 4. 


N urner os 

Existem dois tipos de numeros que podem ser guardados dentro do Apple II: inteiros, que sao 
numeros sem parte decimal, e numeros reais (tambem chamados numeros em ponto flutuante), 
que tern parte fracionaria. Como se pode suspeitar, o Integer BASIC so aceita numeros inteiros. 
0 Applesoft aceita tanto inteiros como reais. 

Devem-se expressar todos os numeros com vfrgula. Por exemplo, deve-se usar 32000, e nao 
32.000. 


Inteiros 

Um inteiro e um numero que nao tern parte decimal ou ponto decimal. O numero pode ser nega- 
tivo ( —) ou positivo ( + ). Um numero sem sinal e tratado como positivo. Os numeros inteiros 
devem ter valores na faixa entre —32767 e 32767. A seguir, alguns exemplos de inteiros: 

0 

1 

44 

32699 

-15 
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Numeros Reais 

Um numero real pode ser inteiro com parte fracionaria ou fracao. 0 numero pode ser negativo 
(-) ou positivo ( + ). Se nao tiver sinal assume-se como positivo. 0 menor (mais negativo) numero 
real e: 


-100000000000000000000000000000000000000 

e o maior e: 

100000000000000000000000000000000000000 
Aqui estao aiguns exemplos de numeros reais: 

5 

-15 

65000 

161 

0 

0.5 

0.0165432 

1.6 

24.0055 

-64.2 


Quando o valor fracionario de um numero chegar proximo de zero em cerca de 
.000000000000000000000000000000000000003, sera convertido para zero. 


Notagao Cientffica 

Numeros reais muito grandes ou muito pequenos sao representados em Applesoft usando notacao 
cientffica. Qualquer numero que tenha mais de nove dfgitos a frente do ponto decimal sera expres- 
so em notacao cientffica. Qualquer numero fracionario mais proximo de zero que ±1 sera expresso 
em notagao cientffica. 

Um numero em notacao cientffica tern a forma: 
numero E±ee 


onde: 

numero e um inteiro, fracionario ou combinado, como ilustrado acima. A porcao numero contem 
os dfgitos numericos significantes; e chama-se coeficiente. Se nao aparece o ponto 
decimal assume-se que ele esta a direita do coeficiente. 

E e sempre uma letra. Vem da palavra expoente. 

± e o sinal opcional mais ou menos. 

ee e o expoente com um ou dois dfgitos. 0 expoente indica a magnitude do numero, isto e, 

o numero de posicoes a direita (expoente positivo) ou a esquerda (expoente negativo) 
de quanto o ponto decimal deve ser movido para fornecer a posicao real do ponto 
decimal. 
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Aqui estao alguns exemplos de notapao cienti'fica: 


Notapao Co mum 


1000000000 

.000000001 

200 

-123456789 

-.0000123456789 


Notapao Cienti'fica 


IE +09 
IE -09 
2E +02 

-1.23456789E +09 
—1.23456789E — 06 


Como se pode ver, a notapao cienti'fica e uma forma conveniente de expressar numeros mui- 
to grandes ou muito pequenos. Os valores maximo e mfnimo dos numeros reais, que foram expres- 
sados como um punhado de zeros, podem tambem ser expressados como IE+38 e IE—38, res- 
pectivamente (muito mais compactos). De forma identica, o numero mais proximo de zero e 
3E-38. 


Arredondamento 

Mencionamos anteriormente que os numeros reais podem ter ate 9 dfgitos de precisao. Para um 
numero maior que 1 ou menor que —1, significa que apenas os nove dfgitos mais a esquerda podem 
ser diferentes de zero. O Apple II arredonda e despreza qualquer dfgito excedente a nove. Temos 
alguns exemplos (veja que numeros muito grandes sao expressos em notapao cienti'fica): 

'3 PR I NT 1234567891 
1,23456/89E+09 
]?-123456789123456789 
-1.23456789E+17 
17-150000475.75 
-150000476 
3790000000.7558 
90000000»8 

Numeros fracionarios (entre —lei) estao sujeitos as mesmas limitapSes. Neste caso, entre- 
tanto, os nove dfgitos iniciam com o primeiro dfgito diferente de zero a direita do ponto decimal. 
Aqui estao alguns exemplos: 

3PRTNT .1234567891 
..12345678? 

3 ? - 1 23 45 67 891 2 3 4 56 7 89 

~1,23456789E +1 7 

3^-123456789 123456789 

-1.23456789E+17 

3?.000000000900000007558 

9 w 00000008E-10 
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VARIAVEIS 

Ate o presente, na discussao de dados so consideramos valores constantes. As vezes e mais facil 
referenciar um item pelo seu nome ao inves de seu valor. E af entra o conceito de variavel. 

Para aqueles que ja estudaram elementos de algebra, os conceitos de variavel e nome de 
variavel sao faceis de serem entendidos. Para os que nunca estudaram algebra, pode parecer que 
nomes de variaveis sao como nome que se dao a caixas postais. Qualquer coisa colocada dentro da 
caixa passa a ser o valor associado com o nome da caixa, ate que alguma coisa nova seja colocada 
na caixa. Em "computes", dizemos que um valor foi armazenado na variavel. 



Nem sempre uma variavel se refere ao mesmo valor. Isso e muito importante — ela pode 
representar qualquer valor permitido. Pode-se alterar seu valor no curso do programa. 0 BASIC 
tern uma serie de comandos para essa finalidade; eles serao vistos mais tarde. 


Nomes de Variaveis em Integer BASIC 

Os nomes de variaveis em Integer BASIC podem ter de 1 a 100 caracteres. Essas sao as regra* gerais 
para construir nomes de variaveis no Integer BASIC: 




t-0 ultimo caractere deve ser zero para variaveis tipo cordao 


Segundo, terceiro, quarto etc caracteres (opcional) podem 
ser letras ou numeros 


Primeiro caractere deve ser uma letra 


0 ultimo caractere do nome da variavel diz ao BASIC que tipo de dado ela representa — cordao 
ou numerico. 

As variaveis cordao referenciam uma sequencia de caracteres com tamanho de 0 a 255. Os 
caracteres em branco tambem contam dentro do cordao. Antes de se usar uma variavel cordao, 
deve-se especificar seu tamanho maximo. Faz-se isso com o auxflio do comando DIM, que sera 
descrito mais tarde. Se isso nao for feito, sera emitida a mensagem de erro *** STR OVFL ERR. 
Seguem adiante alguns exemplos de nomes de variaveis, legais e ilegais: 
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Legais 

A$ 

NOMEADO$ 

PARTE1$ 

RESPOSTA$ 

X8$ 


I legais 

$ 

9$ 

NOME.DADO$ 


Os valores numericos no Integer BASIC devem ter valores contidos entre —32767 e +32767. 
Se esses limites forem ultrapassados, e dada a mensagem de erro ***>32767 ERR. Abaixo se- 
guem alguns exemplos de valores numericos legais e ilegais: 


Legais 

A 

cOdigoa 

xo 


Ilegais 

APLICAQAO'BASE 

3X4Z 

$TOTAL 


Nomes de Variaveis em Applesoft 

Um nome de variavel pode ter urn, dois ou tres caracteres no Applesoft. Aplicam-se as seguintes 
regras: 


n 



0 ultimo caractere da o tipo de variavel: 

$ para variavel cordao 
% para valor inteiro 

qualquer outro caractere indica variavel real 


0 segundo caractere (opcional) pode ser qualquer 
letra ou numero 


Primeiro caractere deve ser letra 


0 ultimo caractere diz ao Applesoft que tipo de dado a variavel representa. 

Uma variavel cordao em Applesoft pode guardar um valor de tamanho entre 0 e 255 carac¬ 
teres. Nao se especifica o tamanho do cordao como no Integer BASIC; 0 Applesoft nao necessita 
disso. Aqui estao alguns exemplos de nomes de variaveis, legais e ilegais: 


Legais 

Ilegais 

A$ 

0? 

MN$ 

M!$ 

F6$ 

77$ 







62 


APPLE II 


Variaveis inteiras referenciam numeros inteiros entre —32767 e 32767. Se esse limite for 
excedido, e dada a mensagem 7ILLEGAL QUANTITY ERROR. Se for tentado armazenar um 
valor real numa variavel inteira, o Applesoft convertera o real para inteiro antes. Vamos ver as 
regras de conversao rapidamente. Aqui estao alguns exemplos de variaveis inteiras legais e ilegais 
do Applesoft: 


Legais 

Ilegais 

A% 

A$% 

B% 

31% 

A1% 

3D% 

X4% 



Variaveis reais referenciam valores numericos restritos na faixa de —10 38 a -MO 38 , embora 
se possa trabalhar com valores de ate 1.7 X 10 38 (±) sob certas circunstancias. Se for tentado 
(numa variavel real) guardar um numero maior, sera dada a mensagem 70VERFL0W ERROR. 

Quando o valor de uma variavel real chega mais proxima de zero do que ±2.9388 X 10~ 39 
o Applesoft converte a zero. 

Lembre-se: as variaveis reais podem ter valores inteiros, desde que o inteiro e uma real com 
a parte fracionaria igual a zero. Aqui vao alguns exemplos de variaveis reais legais e ilegais: 


Legais 

Ilegais 

A 

0 

B 

7B 

A1 

A# 

AA 


Z5 



Nomes Grandes de Variaveis em Applesoft 

Os nomes de variaveis podem ter mais de dois caracteres alfanumericos (mais o % ou $ para inteiros 
e cordoes), mas apenas os dois primeiros caracteres sao considerados no Applesoft. Assim, PREQOI 
e PREQ02 sao o mesmo nome, porque ambos iniciam com PR. No entanto, PREQ01 e PREC01% 
sao diferentes, porque tern diferentes tipos de sufixo. 

0 Applesoft permite nomes de variaveis de ate 255 caracteres. 

Aqui estao alguns exemplos de nomes de variaveis com mais de dois caracteres: 

Legais Ilegais 

CONTADOR% ITEM#% 

BALANQOANUAL 2ATABELA 

NOME$ END EREQO.COME RCIAL% 

Tenha os seguintes pontos em mente para uso de nomes de variaveis com mais de dois carac¬ 


teres: 
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1. Apenas os primeiros dois caracteres e o sufixo do tipo da variavel (% ou $) sao signifi- 
cativos. Nao se deve usar nomes com extensoes do tipo CONTA1% e CONTA2%; eles 
referenciam a mesma variavel: CO%. 

2. Caracteres adicionais precisam espago extra de memoria, que podem ser necessSrios para 
os programas maiores. Porem a vantagem de se usar nomes de variaveis maiores e que eles 
tornam o programa mais facil de ser lido. CODITEM, por exemplo, tern mais significado 
do que CO, para o nome da variavel que fornece o codigo do item num programa de con- 
trole de estoque. 


Pa lavras Reservadas 

Todas as palavras que definem operagoes de comandos BASIC sao chamadas palavras reservadas. 0 
Apendice F fornece todas as palavras reservadas tanto do Integer BASIC quanto do Applesoft. 
Muitas dessas palavras reservadas ja foram vistas neste capftulo, e outras serao descritas em outras 
partes do livro. 

Na execucao de urn programa BASIC, o Apple II varre todos os comandos BASIC, procu- 
rando cordoes que se constituam em palavras reservadas. A unica excegao sao os cordoes de texto 
entre aspas. Pode causar problema a insergao de uma palavra reservada como nome de variavel. 
0 Apple II nao e esperto o suficiente para perceber urn nome de variavel apenas por sua localizagao 
no comando BASIC. Assim, deve-se ter muito cuidado para nao induir palavras reservadas como 
nomes de variaveis ; isso e especialmente importante com as palavras reservadas menores que podem 
facilmente ser tomadas como nomes de variaveis. 


ARRANJOS 

Arranjo e apenas uma forma sistematica de se dar nomes a uma lista grande de variaveis. Eles sao 
usados frequentemente em muitos tipos de programas de computador. Se for diffcil entender o 
que significa arranjo, ou como usa-lo, leia esta secao; a informagao que segue e muito importante 
em seu desenvolvimento para programagao. 

Conceitualmente, urn arranjo e uma coisa muito simples. Quando se tern dois ou mais itens, 
ao inves de se dar urn nome a cada variavel, da-se urn nome so ao conjunto inteiro. Esse conjunto 
e chamado arranjo, e seu nome e o nome do arranjo. Cada urn dos elementos componentes e um 
elemento do arranjo. Os elementos do arranjo sao numerados. Seleciona-se um elemento usando 
seu numero de posigao, que se chama fndice. 

Arranjos sao uma forma compacta de descrever um amontoado de variaveis relacionadas. 
Veja, por exemplo, uma tabela de 200 numeros. Pense como seria penoso associar cada um dos ele¬ 
mentos da tabela com um nome de variavel. E muito mais simples dar-se um unico nome a tabela 
inteira e identificar cada um dos numeros pela sua posigao. Isso e precisamente o que faz o arranjo. 

Como exemplo de aplicagao do arranjo, pensemos num hotel com dez quartos com a neces- 
sidade de saber quern esta em qual quarto. 


PEDRO 

MARIA 

JOS£ 


PAULO 

LUIZ 

SERGIO 

MARCIA 

CELSO 


Q1$ 

Q2$ 

Q3$ 

Q4$ 

Q5$ 

06$ 

Q7$ 

Q8$ 

Q9$ 

Q10$ 
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Ou se pode considerar a lista de clientes do hotel como um arranjo. 


PEDRO 

MARIA 

JOS£ 


PAULO 

LUIZ 

SERGIO 

MARCIA 

CELSO 


Q$(1) 

Q$(2) 

Q$(3) 

Q$(4) 

Q$(5) 

Q$(£) 

Q$(7) 

Q$(8) 

Q$(9) 

Q$(10) 


Nesse exemplo, R$eo nome do arranjo. Ele tem dez elementos; cada elemento e o nome do ocu- 
pante de cada quarto. 0 fndice (entre parenteses) segue cada nome da variavel. Assim um dado 
especffico (por exemplo, o ocupante do quarto 1) e identificado pelo nome da variavel e um fndi- 
ce. 0 ocupante do terceiro quarto e o valor de Q$(3), que e JOSE. 

0 exemplo de arranjo acima usa arranjo de cordoes porque eles sao mais intuitivos para se 
entender. Porem, o Integer BASIC so permite arranjos numericos. 

Os arranjos no Applesoft podem representar variaveis inteiras, reais ou cordoes; no entanto, 
um arranjo simples so pode representar um tipo de dado. Em outras palavras, uma variavel simples 
nao pode misturar numeros inteiros e reais, a exceqao de que uma variavel real pode conter um 
numero inteiro (nao vice-versa). Cada tipo de arranjo usa uma quantidade diferente de espaco de 
memoria; veja o Apendice G para detalhes. 


Dimensoes de Arranjos 

Deve-se especificar o numero de elementos de um arranjo antes de usa-lo no Integer BASIC. Faz-se 
isso com o comando DIM. Os comandos DIM serao descritos adiante neste capftulo. 

0 Applesoft permite usar arranjos com ate 10 elementos sem ter que defini-los antes. 

Os arranjos do Applesoft podem ter mais de uma dimensao, o que quer dizer que existirao 
mais de um fndice para selecionar cada elemento. Um arranjo com uma so dimensao e equivalente 
a uma tabela com apenas uma linha de elementos. 0 fndice identifica o elemento dentro da linha. 
Um arranjo com duas dimensoes e como uma tabela de numeros, montados em forma de linhas e 
colunas; um fndice identifica a linha e outro a coluna. Pode-se visualizar um arranjo de tres dimen¬ 
soes como um cubo de numeros, ou mesmo uma pilha de tabelas. Quatro ou mais dimensoes no 
arranjo e mais dif fcil de visualizar porem, sob o ponto de vista matematico, nao e mais complicado 
que um arranjo simples de uma so dimensao. 

Pode-se criar um exemplo de arranjo de duas dimensoes por extensao do anterior. Conside- 
remos um hotel de oito andares, com dez quartos em cada andar. Existem quatro opgoes que se 
podem adotar para controlar os 80 possfveis clientes. Primeiro, cada quarto ter seu proprio nome 
de variavel. Segundo, o hotel pode ter um arranjo de 80 elementos. Terceiro, cada andar pode ter 
seu proprio arranjo de 10 elementos. Quarto, o hotel pode ter um arranjo de duas dimensoes. 
A opcao final pode ser vista como segue: 












PROGRAMANDO EM BASIC 


65 


H$ (8,1) 

H$(8,2) 

H$(8,3) 

H$(8,4) 

H$(8,5) 

H$(8,6) 

H$(8,7) 

H$(8,8) 

H$(8,9) 

H$(8,10) 

H$(7,1) 

H$(7,2) 

H$(7,3) 

H$(7,4) 

H$(7,5) 

H$(7,6) 

H$(7,7) 

H$(7,8) 

H$(7,9) 

H$(7,10) 

H$(6.1) 

H$(6,2) 

H$(6,3) 

H$(6,4) 

H$(6,5) 

H$(6,6) 

H$(6,7) 

H$(6,8) 

H$(6,9) 

H$(6.10) 

H$(5,1) 

H$(5,2) 

H$(5,3) 

H$(5,4) 

H$(5,5) 

H$(5,6) 

H$(5,7) 

H$(5,8) 

H$(5,9) 

H$(5,10) 

H$(4,1) 

H$(4,2) 

H$(4,3) 

H$(4,4) 

H$(4,5) 

H$(4,6) 

H$(4,7) 

H$(4,8) 

H$(4,9) 

H$(4,10) 

H$(3.1) 

H$(3,2) 

H$(3,3) 

H$(3,4) 

H$(3,5) 

H$(3,6) 

H$(3,7) 

H$(3,8) 

H$(3,9) 

H$(3,10) 

H$(2,1) 

H$(2.2) 

H$(2,3) 

H$(2,4) 

H$(2,5) 

H$(2,6) 

H$(2,7) 

H$(2,8) 

H$(2,9) 

H$(2,10) 

H$(1,1) 

H$(1,2) 

H$(1,3) 

H$(1,4) 

H$(1,5) 

H$(1,6) 

H$(1,7) 

H$ (1,8) 

H$(1,9) 

H$(1,10) 


Como se pode ver, o primeiro fndice do arranjo de duas dimensoes indica o numero do andar e o 
segundo fndice e o numero do quarto naquele andar. Assim, Q$(3,2) deve ser o nome do ocupante 
do segundo quarto no terceiro andar. 

Os arranjcs do Applesoft podem ter ate 88 dimensoes. Nao existe limite especffico para o 
numero de elementos em cada dimensao. 0 tamanho da memoria disponfvel limita o numero total 
de elementos, claro, desde que cada elemento necessita urn certo espago de memoria. 


EXPRESSOES 

Na segao seguinte vamos explorar as formas pelas quais podem-se combinar os valores de variaveis 
e constantes usando expressdes. Ja usamos expressoes para calcular o valor de problemas aritme- 
ticos simples em modo imediato. Lembre-se do comando 

PRINT 4+6 
10 

que diz ao Apple 11 para somar 4 e 6, e mostrar a soma. 0 comando 

PRINT A+B 
0 

diz ao Apple II para somar os valores de duas variaveis numericas A e B, e mostrar a soma. 

0 sinal mais (+) especifica adipao. Em "computes" esse sinal e urn operador. 0 sinal mais e 
um operador aritm^tico porque especifica adigao, que e uma operagao aritmetica. 

Os operadores aritmeticos sao bastante simples de se entender; todos ja aprendemos a somar, 
subtrair, multiplicar e dividir quando criangas. Porem, existem outros tipos de operadores: opera¬ 
dores de cordao, operadores relacionais e operadores Boo/eanos. Eles tambem sao faceis de se 
entender, mas requerem um pouco mais de explicagao por usarem notapao um pouco mais abstrata. 

Cada categoria de operadores define um tipo de expressao. Existem expressoes aritmeticas, 
expressoes de cordao, expressoes relacionais e expressoes Booleanas. 


Precedence de Operadores em Expressoes 

As expressoes podem provocar ocorrencia de mais de uma operagao. Por exemplo, o comando: 
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PRINT A+e/10 
0 

chama adipao e divisao numa mesma expressao. Existe um esquema padrao para determinar em 
que ordem as expressoes devem ser resolvidas. Vamos descrever essas regras de precedencia para 
cada tipo de expressao que inicia com concatenapao de cordoes, inteiros, reais, relacionais, Boolea- 
nos e expressoes mistas, nessa ordem. Prlmeiro vamos ver uma forma de evitar as regras de prece¬ 
dencia acima. 


Contornando as Regras de Precedencia 


Pode-se trocar a ordem que o Apple II utiliza para resolver as expressoes atraves do uso de paren- 
teses. Qualquer operacao dentro de parenteses e realizada primeiro. Quando mais de um conjunto 
de parenteses esta presente, o Apple II calcula da esquerda para a direita. 

Quando um conjunto de parenteses esta envolvido por outro, diz-se que ele esta aninhado. 
Neste caso, o Apple II calcula primeiro o mais interno e depois os subsequentes. Os parenteses 
podem ser aninhados em qualquer quantidade. Pode-se usa-los livremente para tornar clara a ordem 
de precedencia dos calculos na resolupao de expressoes. 

Aqui estao alguns exemplos de calculos aritmeticos em modo imediato usando parenteses: 


PRINT 

36 

C2+10)#3 

PRINT 

670 

(<2+10># 


PRINT - ( 2/' ( 3 + 8/4 ) ) 
-32 


Concatenapao de Cordao 

Pode-se juntar cordoes um no fim do outro para formar um cordao maior. Isso se chama conca¬ 
tenate). Pode-se ver isso abaixo: 


CORDAOI 

+ 

C0RDA02 

+ 

C0RDA03 


transforma-se em 



CORDAOI 

C0RDA02 

C0RDA03 



Com a concatenapao, pode-se obter cordoes com ate 255 caracteres de comprimento. 

0 Integer BASIC nao possui operacao de concatenapao. Pode-se concatenar cordoes no Inte¬ 
ger BASIC usando as tecnicas mostradas no fim deste capftulo (mostrar agora seria prematuro). 
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0 Applesoft usa o sinal mais (+) com operador de concatenapao. Aqui estao alguns exemplos 
de concatenapao no Applesoft: 


"LOCO” + "MOTIVA" 

torna-se 

"RELAT0RIO" + " " + "MENSAL" 

torna-se 

"CONTA"+ A$ 

torna-se 

A1$ + YA$ + C$(1) 

torna-se 


"LOCOMOTIVA" 

"RELAT0RIO MENSAL" 

"CONTA" seguido pelo valor de A$ 

o valor de A1$ seguido pelo valor de YA$ 
seguido pelo valor de C$(1) 


Expressoes Inteiras 

Expressoes inteiras sao expressoes aritmeticas que envolvem apenas variaveis e constantes inteiras. 
Mostraremos as expressoes aritmeticas que usam tanto valores inteiros quanto reais sob o ti'tulo 
"Expressoes de Tipo Misto". 

Os operadores para expressoes inteiras sao adicao (+), subtrapao (—), multiplicapao ( * ), 
divisao ( / ) e exponenciapao (A ). Pode-se tambem usar o sinal negativo ( —) para indicar um valor 
numerico negativo. As operapoes sao executadas na seguinte ordem: primeiro o negativo ( —), 
depois a exponenciapao, a multiplicapao e a divisao, e por ultimo a adicao e a subtrapao. As ope¬ 
rapoes com igual precedencia sao executadas na ordem da esquerda para a direita. 

Aqui estao alguns exemplos de expressoes inteiras no Integer BASIC: 


100 — 30 * 2 

resulta em 

40 

—9a2 

resulta em 

81 

A/B *C 

resulta no 

valor de A dividido pelo valor de B, e no valor inteiro da 
divisao multiplicado pelo valor de C 

D + X*3 

resulta em 

3 vezes o valor de X somado ao valor de D 

5/2*2 

resulta em 

4 (o quociente de 5/2 e convertido para o inteiro 2) 

Aqui estao alguns exemplos de expressoes inteiras no Applesoft: 

-120/2 + 100 

resulta em 

40 

2A3*2 

resulta em 

16 

N1% *N2%/N3% 

resulta no 

valor de N1% vezes o valor de N2% e no produto dividido 
pelo valor de N3% 

AA%/AB%/AC% 

resulta no 

valor de AA% dividido pelo valor de AB% e no quociente 
dividido pelo valor de AC% 

5/2*2 

resulta em 

5 (o quociente de 5/2 nao e convertido para inteiro) 


0 Integer BASIC tern um operador a mais que pode ser usado em expressoes inteiras. Ele 
retorna o resto de uma operapao de divisao em que o dividendo nao e divisi'vel pelo divisor. 
0 operador e o MOD, e tern a mesma precedencia que a multiplicapao e a divisao. Aqui estao 
alguns exemplos do MOD: 
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4 MOD 3 

resulta em 

1 

3*5 MOD 4 

resulta em 

3 

(41 4- 2)/25 MOD A resulta no 

resto da divisao obtida dividindo 18 pelo valor de A 

3 MOD 4 

resulta em 

3 


Expressoes Reais 

0 Applesoft tern outro tipo de expressoes aritmeticas; ele fornece numeros reais. Os seus opera- 
dores sao os mesmos que os das operagdes inteiras do Applesoft: adigao (+), subtragao (—), multi- 
plicagao ( * ), divisao (/), exponenciagao ( a ) e negativo (-). A precedence dos operadores tam- 
bem e a mesma: primeiro negativo, depois exponenciagao, multiplicagao e divisao, e por fim adigao 
e subtragao. Aqui estao alguns exemplos de expressoes reais: 


87.5-4.25*2 

resulta em 

79 

1.5 A (3/2/2) 

resulta em 

1.35540301 

AL*(PL -3.1 *CB) 

resulta no 

valor de AL vezes o resultado da subtragao do produto de 
3.1 vezes o valor de CB do valor de PL 

7.5 *2/5 

resulta em 

3 


Expressoes Relacionais 

Os operadores relacionais permitem que se compare dois valores para ver qual a relagao entre um e 
outro. Pode-se comparar dois valores para ver se o primeiro e maior que, menor que, igual, dife- 
rente, maior ou igual ou menor ou igual que o segundo valor. Os valores comparados podem ser 
constantes, variaveis ou qualquer tipo de expressoes. (Existem algumas restrigoes no Integer 


TABELA 3.1. Operadores Relacionais. 


Operadores do 
Integer BASIC 

Operagao 

Operadores 

Applesoft 

< 

menor que* 

< 

> 

maior que* 

> 

= 

igual a 

= 

# ou < > 

diferente 

< > ou > < 

> = 

maior ou igual a* 

> = ou = > 

< = 

menor ou igual a* 

< = ou = < 

* Nao permitido com cordoes em Integer BASIC. 
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BASIC.) Se o valor de um lado do operador relacional e um cordao, o valor do outro lado tam- 
bem deve ser tipo cordao. Fora isso, pode-se comparar um tipo de valor com outro usando opera- 
dores relacionais. 

Se a relapao e verdadeira, a expressao relacional tern o valor numerico de 1. Se ela e falsa a 
expressao relacional tern o valor numerico 0. 

Os operadores relacionais para o Integer BASIC e o Applesoft sao os mesmos, com excepoes, 
como mostrado na Tabela 3.1. 

Todos os operadores relacionais tern a mesma precedencia; eles sao calculados da esquerda 
para a direita. 

Aqui estao alguns exemplos de expressoes relacionais: 


1 = 5-4 

resulta em 

1 (verdadeira) 

14 > 66 

resulta em 

0 (falsa) 

15>= 15 

resulta em 

1 (verdadeira) 

"AA" > "AA" 

resulta em 

0 (falsa) 

"ABILIO"<"ANDR£" 

resulta em 

1 (verdadeira) 

(A= B) = (A$ > B$) 

depende 

do valor das variaveis. Se o valor de A 6 igual ao valor 


de B e o valor de A$ 6 maior que o valor de B$, 
entaoo valor dessa expressao resulta em 1 (verdadeira) 


0 conceito que orienta os operadores relacionais e facil de ser entendido. Os valores 0 e 1 
que o BASIC determina arbitrariamente como condipao falsa e verdadeira podem ser usados em 
expressoes inteiras e reais. Isso nao e tao facil de se entender, porque e arbitrario. Por exemplo, 
qual o significado da expressao (1 = 1) *4? Fora de um programa em BASIC esta expressao nao 
teria o menor sentido; mas dentro do BASIC e o mesmo que 1*4, o que resulta em 4. Pode-se 
incluir expressoes relacionais dentro de outras expressoes no BASIC. Aqui estao alguns exemplos: 

25 4- (14 >66) 6 o mesmo que 25 + 0 

(A + (1 = 5 - 4)) * (15>= 15) eo mesmo que (A + 1) *(1) 


Com par a pao de Corddes 

Vamos aqui considerar quais as regras que o Apple II usa para comparar cordoes de texto. Existem 
duas considerapoes. A primeira e sobre o tamanho do cordao. Cordoes de diferentes tamanhos 
(lembre-se que os espacos em branco ocupam espapos no cordao) nao sao iguais. Se um cordao 
pequeno e identico a primeira parte de um cordao maior, o cordao maior e tornado como o maior 
dos dois (isso so se aplica ao Applesoft). A segunda considerapao e sobre cordoes que tern o mesmo 
numero de caracteres, na mesma ordem. No Integer BASIC, so se podem comparar dois cordoes 
com os operadores = e #ou < >. Os cordoes sao comparados com um caractere por vez, iniciando 
com o colocado mais a esquerda — o primeiro caractere de um cordao com o primeiro caractere 
do outro, o segundo com o outro, o terceiro com o outro e assim por diante ate que os dois 
cordoes terminem ou ocorra uma diferenca. 

0 Applesoft compara a ordem relativa dos caracteres um a um. Para propositos de compa- 
racao, as letras do alfabeto tern a ordem A < B, B < C, C < D, 1 < 2, 2 < 3 etc. Outros caracteres 
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que aparecem no cordao, como +, —, $ etc. sao colocados arbitrariamente na ordem mostrada 
no Apendice I. 


Expressoes Booleanas 

Os operadores Booleanos dao aos programas a habilidade de fazer decisoes iogicas. Por isso eles sao 
chamados tambem de operadores logicos. Existem quatro operadores logicos padroes: AND, OR, 
OR exclusivo e NOT. 0 BASIC do Apple II suporta tres desses operadores: AND, OR e NOT. 

Se existe dificuldade para se entender o conceito dos operadores Booleanos, uma analogia 
com compras em supermercado serve para ilustrar como sao eles. Suponhamos que estamos num 
supermercado para comprar doces em companhia de duas criancas. 0 operador AND diz que voce 
vai comprar o doce se as duas criancas quiserem. 0 operador OR diz que vamos comprar o doce 
se uma das crianpas quiser. 0 operador NOT e o da contrariedade. Se a crianga A insiste em dis- 
cordar da crianga B, sua decisao e o NOT dela. 

Os computadores nao operam com analogia; eles trabalham com numeros. Por isso a logica 
Booleana reduz os valores das decisoes a 1 ou 0 (verdadeiro ou falso). Como os operadores Boolea¬ 
nos trabalham com uns e zeros, eles sao freqiientemente usados em expressoes relacionais (lembre- 
se que as expressoes relacionais sempre resultam em uns e zeros). Os operadores Booleanos podem 
trabalhar com outros tipos de operandos, como veremos rapidamente na proxima segao. 

A Tabela 3.2 sumariza a forma pela qual as expressoes Booleanas sao calculadas. Essa tabela 
e referenciada como tabela verdade. Os operadores Booleanos tern igual precedence. Se aparece 
mais de um operador Booleano na mesma expressao, o calculo e feito da esquerda para a direita. 
Aqui estao alguns exemplos de operadores Booleanos: 


NOT ((3 + 4) > = 6) 

resulta em 

0 

(falso) 

("AA" = "AB") OR ((8*2) = 4a 2 

resulta em 

1 

(verdadeiro) 

NOT ("APPLE" = "ORANGE") 

AND (A$ = B$) 

resulta em 

1 

(verdadeiro) se A$ e B$ forem iguais e 
0 (falso), se nao forem. 


TABELA 3.2. Tabela Verdade Booleana. 


A operagao AND resulta em 

1 se ambos os valores forem 1. 

1 AND 1 = 1 

1 AND 0 = 0 

0 AND 1 = 0 

0 AND 0 = 0 

A operagao OR resulta em 1 

se algum deles for 1. 

1 OR 1 = 1 

1 OR 0 = 1 

0 OR 1 = 1 

0 OR 0 = 0 

A operagao NOT complementa logicamente cada valor. 

NOT 1 = 0 

NOT 0 = 1 
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Expressoes do Tipo Misto 

Muitas vezes as expressoes envolvem valores de mais de um tipo. Isso e especialmente frequente 
no Applesoft, que trabalha com numeros inteiros e reais. Ja foi colocada a ideia de expressoes do 
tipo misto quando discutimos as expressoes relacionais e Booleanas. Pode-se misturar os tipos de 
expressoes de forma livre, 3 excegao de que os cordoes nao podem fazer parte de expressoes 
inteiras, reais ou Booleanas. Os cordoes so podem fazer parte de expressoes deles mesmos e das 
relacionais. Aqui estao alguns exemplos de expressoes do tipo misto: 


Legais 

3.1416* (RA2) 

A% > = B/3 
43 AND 137 
1 OR4E + 10 
(A$ = B$) AND-6.25 


I legais 

1 600 + "AVENI DA SAO JOAO" 
ST$ < A% 

A$ AND B$ 

NOT (A$) = B$ 

NOT (A = B) OR C$ 


TABELA 3.3. Operadores. 



Precedencia 

Operador em 
Integer BASIC 

Operador em 
Applesoft 

Significado 


9 

(maior) 

( ) 

( ) 

Parenteses da a ordem 

de calculo 


8 

A 

A 

Exponenciagao 


7 

- 

- 

Negagao 

Operadores 

Aritmeticos 

6 

6 

* 

/ 

* 

/ 

Multiplicagao 

Divisao 

6 

MOD 

nao permite 

Resto da divisao** 


5 

+ 

+ 

Adigao 


5 

- 

- 

Subtragao 


4 

= 

= 

Igual 


4 

# 

< > ou > < 

Diferente 

Operadores 

4 

< 

< 

Menor que 

Relacionais 

4 

> 

> 

Maior que 


4 

< = 

< = ou = < 

Menor ou igual a 


4 

> = 

> = ou = > 

Maior ou igual a 


3 

NOT 

NOT 

Complemento logico 

Operadores 

2 

AND 

AND 

E logico 

Logicos 

1 

(menor) 

OR 

OR 

OU logico 

** Apenas no Integer BASIC. 
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0 Apple 11 tern varias coisas a resolver quando esta operando com operadores misturados. 
A primeira preocupagao e com a precedencia dos operadores. A Tabela 3.3 mostra os operadores 
de todos os tipos na ordem de precedencia, da maior para a menor. Ela indica que tudo que esti- 
ver entre parenteses e calculado primeiro. Se existir mais de urn nfvel de parenteses, o Apple II 
calcula o mais interno primeiro, depois o seguinte etc. (Relembre o conceito de parenteses aninha- 
dos.) Depois, sao calculadas as expressoes aritmeticas. Finalmente as expressoes relacionais e as 
expressoes Booleanas. 

Como foi visto antes, as expressoes relacionais devolvem o valor 1 ou 0 dependendo se a 
relagao testada for verdadeira ou falsa. Assim, uma expressao relacional pode ser parte de uma 
expressao inteira ou real. 

Pode-se tambem misturar tipos em expressoes Booleanas. Tudo, numa expressao Booleana, e 
convertido em 1 e 0, antes que a operagao seja executada. Os valores numericos sao convertidos de 
acordo com a seguinte regra: se o valor e 0, ele fica 0; se e diferente de 0 e convertido para 1. 

0 BASIC nao pode, automaticamente, converter cordoes para valores numericos, de forma 
que os cordoes sao ilegais em expressoes inteiras, reais e Booleanas, exceto como parte de expres¬ 
sao relacional. 

No Applesoft tanto valores inteiros quanto reais podem estar presentes em expressoes reais 
inteiras e Booleanas. 

Quando valores inteiros ocorrem em expressoes reais, eles sao convertidos temporariamente 
para real para o cSIculo da expressao. 0 resultado final de tal expressao pode ser tanto urn inteiro 
quanto um real, dependendo do contexto em que a expressao ocorra. 0 Applesoft converte o valor 
automaticamente de forma apropriada. 

Os valores reais sao convertidos para inteiros eliminando a parte fracionaria e usando o me¬ 
nor numero inteiro seguinte. Isso e chamado truncar. Por exemplo: 


1.1 

torna-se 

1 

1.9 

torna-se 

1 

-1.1 

torna-se 

-2 

-1.9 

torna-se 

-2 


COMANDOS DO BASIC 


Agora estamos prontos para descrever a parte do BASIC que especifica a operagao que o comando 
executara. Especificam-se essas operagoes com instrugoes BASIC. E uma pratica comum se usar os 
termos comando e determinagao de forma identica e ambfgua. Rigorosamente, um comando e uma 
instrugao executavel em modo imediato. A mesma instrugao dentro do programa e uma determi- 
nagao. 

Cada instrugao executa uma tarefa especffica. Este capftulo introduz conceitos de progra- 
magao, mostrando a forma como as determinagoes sao usadas. Nao as mostraremos em detalhes 
aqui. A descrigao completa das determinagoes se encontra no Capftulo 8 que pode ser consultado 
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para se ter melhor ideia de como operam. Este capftulo apenas conduz ao entendimento de parte 
da capacidade das determinapoes. 

Uma ultima observapao antes de comeparmos. Embora este capftulo introduza conceitos de 
programapao, ele nao divide programapao em partes. Se for necessario ter mais conhecimentos 
sobre programapao propriamente dita, consulte a lista de livros de iniciapao constantes no Apen- 
dice K. 


COMENTARIOS 

E interessante que toda a abordagem sobre as declarapoes do BASIC inicie com a descripao da 
unica declarapao BASIC que o computador ignora: o comentario. Se os primeiros tres caracteres 
da declaracao sao REM, o computador ignora completamente a declarapao. Entao, por que existe 
tal declarapao? A resposta e que o comentario torna o programa facil de ser lido. 

Se se escreve um programa pequeno com cinco ou dez declarapoes, provavelmente nao 
existem maiores problemas quando, apos algum tempo, se deseja lembrar o que aquele programa 
faz e como — a menos que o tempo decorrido seja muito grande. Porem se o programa escrito tern 
100 ou 200 declarapoes, e muito provavel que se esqueca algo muito importante sobre ele ja na 
proxima vez que se va usa-lo. Apos escrever algumas duzias de programas, e certo que nao nos 
lembramos de cada um deles em detalhes. A solupao para este problema de documentar programas 
e a inserpao de comentarios. 

Os bons programadores tern seus programas repletos de comentarios. Em todos os exemplos 
de programas deste capftulo incluiremos comentarios para informar o que esta acontecendo, para 
estimular a todos que os utilizem tambem. 

Os comentarios tern numero de linha, como qualquer outra declarapao. 0 numero de linha 
da declarapao de comentario pode ser usado como se usa qualquer outro numero de linha. 


DECLARAQAO DE ATRIBUIQAO 

Declarapoes de atribuipoes fazem associar valores a variaveis. Encontram-se declarapoes de atri- 
buipoes frequentemente, em todos os tipos de programas BASIC. 

90 REM TNICIALIZA A UARIAVEL X 
100 LET X= :: 3 

Na declarapao 100, a variavel X e atribufdo o valor 3; esta mesma declarapao pode ser reescrita: 

100 X=3 

A palavra LET e opcional; normalmente e omitida. 

Aqui esta uma declarapao de atribuipao de variavel do tipo cordao: 

215 A$ DOCE UI DA" 

Atribui-se a variavel cordao A$ as duas palavras "DOCE VIDA”. 

Seguem tres declarapoes de atribuipao que atribuem valores a variavel tipo arranjo R$( ), que 
foi encontrada antes quando descrevfamos os arranjos: 
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200 REM R*<) E UMA LIST A DE CLIENTES DO HOTEL 

210 R * (1 ) =" JONES" 

220 R * < 2 ) ="SMIth" 

230 R * (3 > ~"DQE" 

Lembre-se de que podemos colocar mais de uma declaragao por linha; assim as tres decla¬ 
ragoes de R$ podem ser colocadas numa unica linha, como segue: 

200 REM R* ( ) E UMA LISTA 0E CLIENTE : .:S D0 H0TEL 

21 0 R * ( 1 ) - " JONES " 3 R $ < 2 ) " SM I TH " 2 R * < 3 ) = " DOE " 

Lembre-se de que cada declaragao na mesma linha deve ser separada da anterior por doispontos ( :). 

As declaragoes de atribuigao podem incluir quaisquer operadores aritmeticos ou logicos ja 
descritos neste capftulo. Aqui estao alguns exemplos: 

90 REM ESTA E UMA FORMA BOBA DE ATRIBUIR UM VALOR 

100 0=33+7/9 

A declaragao acima atribui o valor 33.77777778 para a variavel real V; e equivalente a tres 
declaragoes: 


90 REM X E Y SERAO USADAS MAIS TARDE 
100 X =:: 7 
110 Y--" 9 
120 U“33+X/Y 

que poderiam ser escritas numa so linha: 

100 X==7: Y = :: 9 s V«33+X/Y 

Aqui esta uma declaragao de atribuigao que executa operagoes Booleanas descritas anteriormente: 

90 REM EXEMPLOS DESCRITOS ANTERIORMENTE 
100 A = :: N0T ( (3+4 > >6 ) 

110 B“ :: ( " AA"~" AB " ) OR <( S«2)«< 4 rt 2) ) 

0 exemplo seguinte mostra como uma variavel tipo cordao pode ter um valor atribufdo usan- 
do a concatenagao do Applesoft: 

90 REM R*<6) TERA 0 VALOR SEU JOAO 
110 SEU* * "SEU " 

120 DONA* = "DONA" 

130 N$ « "JOAO" 

200 R $(6) » SEU* + N* 


Declaragoes READ e DATA 

Quando muitas variaveis precisam de atribuigao num programa do Applesoft, pode-se usar as 
declaragoes READ e DATA ao inves do tipo de declaragao de atribuigao anterior. Veja os exem¬ 
plos seguintes: 
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5 REM INIdALIZA VARIAVEIS DO PROGRAM A 
10 DATA 1 0» 20300 
20 READ A ? B, 0 ,D 

A declaracao da linha 10 especifica os valores numericos das variaveis. Esses quatro valores sao 
atribufdos para as variaveis pela declaragao da linha 20. Depois que as declaragoes das linhas 10 e 
20 forem executadas, A= 10, B = 20, C= —4 e D = 300. 

Se existe mais de uma declaracao DATA no programa, pode-se visualiza-las como uma coluna 
de valores. Por exemplo, uma declaracao DATA que contem uma lista de 10 valores constitui uma 
coluna de 10 entradas. Duas declaragoes DATA, cada uma contendo uma relacao de 5 elementos, 
constitui exatamente a mesma coluna. Isso pode ser ilustrado como segue: 

10 DATA 10,20,30,40,50,60 7n «n on inn l 



Entrada da primeira coluna-► ( 10 

J 20 


100 — Entrada da ultima coluna 


10 DATA 10,20,30,40,50 f / 

20 DATA 60, 70, 80, 90, 100 

A primeira declaracao READ no programa inicia na primeira coluna e pega os valores sequen- 
cialmente, atribuindo-os as variaveis que aparecem na declaracao READ. A segunda (e seguintes) 
declaracao READ pega valores da coluna, iniciando no ponto onde o READ anterior parou. Isso 
pode ser ilustrado como segue: 


10 DATA 


10, 20, 30, 40, 50, 60, 70, 80, 90, 100 


l) 


220 READ A, B, C 


A = 10 
B = 20 
C = 30 



340 READ C, D 



A = 60 


E = 70 
F = 80 
G = 90 


C = 40 
D = 50 



i 40 
» 50 
(60 
70 
) 80 
'90 
100 



490 READ A, E, F, G 
500 READ B- 


B = 1 00' 
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A coluna DATA pode conter tanto valor numerico como cordao. Quando se associa um 
valor a uma variavel usando a declaragao READ, cada valor deve ser do mesmo tipo (cordao ou 
numerico) da variavel a qual sera atribui'do. 

Declaracao RESTORE 

Pode-se voltar o ponteiro ao im'cio da coluna DATA executando a declaracao RESTORE no 
Applesoft. Aqui esta um exemplo de como o RESTORE opera: 


mnATA in 9n Rn ah Rn ro 7n fin on inn l 



490 READ A, E, F, G 
500 READ B- 


B = 50 


Limpando Variaveis 

Tanto o Integer BASIC quanto o Applesoft permitem colocar elementos numericos e elementos 
de arranjos a zero, e toda a variavel cordao e elementos do arranjo nulos, tudo de uma so vez. 

0 comando CLR faz isso no Integer BASIC. Ele so pode ser usado em modo imediato. Aqui 
esta um exemplo: 


>X«37 

>PRINT X 
37 

>Cl..R 

>PRINT X 
0 

A declaracao CLEAR faz isso no Applesoft. Ela tambem opera no DATA como faz o RESTORE. 
Aqui esta um exemplo: 

TIG REM T. NX Cl ALT. ZA OAR IA ME IS 
120 X~37 

130 A$=»"CAMALO DE AGO" 

140 PRINT A$ 

150 CLEAR 
160 PRINT X 
IRON 

CAUALO DE AGO 
0 
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DECLARANDO O TAMANHO DE ARRANJOS E CORD0ES 

Se for necessario usar arranjos e cordoes no seu programa, devem ser declarados os tamanhos 
maximos (ou dimensoes) numa declaracao ou declaracoes DIM (chamada declarapao de dimensio- 
namento) no infcio do programa. Uma declaracao de dimensionamento pode dar a dimensao de 
qualquer numero de arranjos e cordoes desde que caiba numa linha padrao de programa. 

Em Integer BASIC, isso e feito fornecendo o nome do arranjo ou da variavel cordao e a se- 
guir o valor maximo, entre parenteses. Sao permitidos arranjos numericos de apenas uma dimensao 
— nao se pode usar arranjos de cordao e multidimensionados. 0 exemplo que segue ilustra o di¬ 
mensionamento de dois cordoes de 5 e 20 caracteres respectivamente, e urn arranjo numerico 
com 13 elementos (0 ate 12): 

1 0 D X ft 81 *• < : : ;i) / S 2 * C 2 5 ) , N B (1 2 ) 

0 numero que segue o nome da variavel cordao na declaracao DIM e o comprimento maximo 
que o cordao pode ter durante o programa. 0 numero que segue o arranjo numerico e o fndice 
maximo que pode ser chamado dentro do arranjo. 

Na primeira vez que o Applesoft encontra urn arranjo, verifica se ele foi dimensionado. Se 
nao, ele automaticamente dimensiona o arranjo com indices que vao de 0 a 10 para cada dimensao 
usada. Assim, nao e necessario dimensionar urn arranjo, a menos que ele necessite de mais de 
11 elementos em uma dimensao. 0 exemplo seguinte dimensiona o arranjo de uma unica dimensao 
R$. Ele tambem dimensiona um arranjo inteiro de 21 elementos. 

1 5 L) I ft R % (1 0 ) 7 R % < 20) 

A lista de clientes do hotel do nosso exemplo anterior, com duas dimensoes pode ser dimen- 
sionada assim: 

115 DIM H*<8,10) 

O numero (ou numeros) que seguem o nome do arranjo na declarapao DIM e igual ao maior 
valor de fndice que acessa uma posipao particular do arranjo. Lembre-se que os fndices iniciam em 
0. Assim R$(10) dimensiona a variavel R$( ) para ter 11 elementos, nao 10, porque os fndices 0, 
1, 2, 3, 4, 5, 6, 7, 8, 9, 10 sao permitidos. H$(8, 10), da mesma forma, especifica um arranjo 
de duas dimensoes com 99 entradas, porque a primeira dimensao pode ter valores 0, 1, 2, 3 etc., 
enquanto o segundo pode ter os valores de 0 ate 10. 

Redimensionando Arranjos 

Uma vez dimensionada uma variavel arranjo, ela nao pode ser redimensionada sem que o programa 
volte a ser rodado desde o infcio. As referencias subsequentes nao podem usar fndices maiores do 
que o declarado; cada fndice deve ser um numero compreendido entre 0 e o numero usado no 
dimensionamento. 

COMANDOS DE SALTO 

As declaracoes dentro de um programa BASIC sao executadas dentro de uma ordem ascendente 
de numeros de linhas. A seqiiencia de execucao foi explicada anteriormente neste capftulo, quando 
foram descritos os numeros de linha. As declaragoes de salto alteram a seqiiencia de execugao. 
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Declaragao GOTO 

0 GOTO e uma declaragao simples; ela permite especificar a declaragao que sera executada a se- 
guir. Considere o seguinte exemplo: 

20 A = 4 
30 GOTO 100 
40 
50 
60 
70 
80 
90 
100 
110 
etc 

A declaragao da linha 20 e de atribuigao; ela atribui um valor a variavel A. A proxima declaragao 
e um GOTO; ela especifica que a execucao do programa deve saltar para a linha 100. Assim a exe- 
cugao do programa seguira a seqiiencia: linha 20, linha 30, e entao linha 100. 

Claramente, alguma outra declaragao deve fazer o programa voltar para a linha 40, de outra 
forma a declaragao dessa linha nunca seria executada, como mostrado acima. 

Pode-se saltar para qualquer linha, mesmo que ela nao tenha nada alem de um comentario. 
Entretanto, o computador ignora o comentario e tudo se passa como se o salto tivesse sido para a 
linha seguinte. Por exemplo, veja o seguinte salto: 

20 A = 4 
30 GOTO 70 
40 
50 
60 

70 REM ESTA LINHA SO TEM COMENTARIO 
80 
90 
etc. 

A execugao do programa pula para a linha 70; la nao existe nada alem de um comentario, 
assim o computador vai para a linha 80; executando a declaragao la contida. Entao, mesmo que se 
possa saltar para um comentario, e como pular para a linha seguinte. Isso pode ser ilustrado como 
segue: 

20\ A = 4 
7 30> GOTO 80 
/ 40 
/ 50 

l 60 

\ 70 REM ESTA LINHA S6 TEM UM COMENTARIO 
'80 
90 
etc. 
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Tentar saltar para uma linha que nao existe causa uma mensagem de erro. 


Declaracao GOTO Calculada 


Existe mais um tipo de declaragao GOTO que permite ao programa saltar logicamente para uma, 
duas ou mais linhas diferentes, dependendo do valor atual de uma expressao numerica. 

Veja a seqiiencia de declaragoes do Integer BASIC: 


A = 0 

...( 
A = 2 


10 1 

/ 20 ' 




v 30 

/40^ 

>50 

60 

v 70 

80 

90 

100 

'no 

120 

etc. 


A = B - 3 
GOTO 30*A + 50 


A declaracao da linha 40 e um GOTO calculado. Quando esta declaracao e executada, a logica do 
programa vai saltar para o numero de declaracao obtido calculando a expressao. Neste exemplo, 
pula para a declaracao 50 se a variavel A=0, para a declaracao 80 se a variavel A=1, enquanto 


que A=3 causa salto para a declaracao 110. Se a linha calculada nao existe o computador manda 
a mensagem *** BAD BRANCH ERR. Note que se atribui o valor a variSvel A na declaragao 30. 


O valor de A depende do valor atual de B. O exemplo nao mostra como B e obtido; entretanto, se 
B tiver os valores 3, 4 ou 5, a declaragao da linha 40 causal um salto. 


Para testar a declaragao GOTO calculada no Integer BASIC, digite o seguinte programa: 

>9 REM INICIALIZA VARIAVEL B 

>10 B=4 

>20 PRINT B 

>30 A = :: B - 3 

>40 GOTO 30#A+50 

>49 REM B»3 

>50 END 

>79 REM B*4 

>80 PRINT 6 

>90 B---5 

MOO GOTO 20 

MO? REM 

>110 PRINT B 

> 120 B- : 3 

>130 GOTO 20 


Agora execute esse programa digitando RUN. 
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Pode-se contar a seqiiencia na qual os dfgitos aparecem? Tente reescrever o programa de 
forma que cada numero seja mostrado uma vez, na seqiiencia: 345345345. . . 

0 Applesoft tem uma versao urn pouco diferente do comando GOTO calculado, como se ve 
abaixo: 



A% = B% - 2 

ON A% GOTO 10, 70, 150 


etc. 


A declarapao na linha 40 e a forma de GOTO calculada do Applesoft. Quando esta decla- 
racao e executada, a logica do programa tende para a declarapao 10 se a variavel A%=1, para a 
declaragao 70 se A%=2, e A%=3 causa urn salto para a declarapao 110. Se A% tiver valores dife- 
rentes de 1,2 ou 3, o programa continua na linha 50. 

A expressao numa declarapao GOTO calculado dentro do Applesoft e avaliada e seu valor 
determina para qual linha pular a partir da lista de numeros de linhas da declarapao GOTO calcu¬ 
lado. Se o valor e 1, usa-se o primeiro numero de linha, se o valor for 2 usa-se o segundo numero 
e assim por diante. Se o valor for 0 ou exceder a quantidade de numeros de linhas de lista, o 
programa vai para a declarapao seguinte a declarapao GOTO calculado. 

O seguinte programa do Applesoft mostra como a declarapao GOTO calculado opera: 

10 B7. = 4 
20 PRINT B7. 

30 A7. = B7. - 2 

40 ON A7. GOTO 10»70»150 

70 PR I NT B7. 

80 B7. = 5 
90 GOTO 30 
150 PRINT B7. 

160 B7. = 3 
170 GOTO 20 


LOOPS 

As declarapoes GOTO e GOTO calculado permitem criar qualquer seqiiencia de declarapSes que a 
logica do programa precise. Mas suponha que se necessite executar uma instrupao (ou grupo de 
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instrupoes) varias vezes. Por exemplo, suponha uma variavel arranjo A(l) com 100 elementos e 
que cada elemento necessite ter atribuipao com valores entre 0 e 99. Escrever 100 declaracoes de 
atribuipao seria tedioso. E mais fScil reexecutar uma mesma declarapao de atribuipao 100 vezes 
num loop. 

Declaracoes FOR e NEXT 

Pode-se criar um loop usando as declaracoes FOR e NEXT como segue: 

10 DIM A < 99) 

20 FOR 1> 0 TO 99 STEP 1 
30 Ad) = I 
40 NEXT 1 

A declarapao ou declaracoes entre o FOR e o NEXT sao executadas repetidamente. Neste caso 
uma declaracao simples de atribuipao aparece entre o FOR e o NEXT; essa declarapao e executada 
repetidamente. Este tipo de estrutura de programa e chamado de loop FOR-NEXT. 

Pode-se ver no exemplo abaixo um loop FOR-NEXT dentro do programa imprimindo os 
valores atribui'dos ao arranjo A( ) dentro do loop. 

10 DIM A(99) 

20 FOR i>0 TO 99 STEP 1 
30 A(!)=•:I 
35 PRINT ACT.) 

40 NEXT I 
50 END 

Quando se digita RUN o programa mostra 100 numeros indo de 0 ate 99. 

As declarapdes entre o FOR e o NEXT sao reexecutadas o numero de vezes especificado 
pela variavel mdice que aparece diretamente apos o FOR; no exemplo acima a variavel fndice 
e I. O I vai de 0 ate 99 em passo (step) 1. 

A variavel I tambem aparece na declarapao de atribuipao em 30. Dessa forma, na primeira 
vez que a declarapao de atribuipao e executada, I e igual a 0 e a declaracao e executada como: 

30 A ( 0 ) ~ : 0 

I e incrementada no tamanho do passo, que esta especificado na linha 20, como 1; o I assim sera 
1 na segunda vez que a declarapao da linha 30 for executada. A declarapao de atribuipao nessa 
segunda vez sera equivalente a: 

30 A <1> =1 

A variavel I continua a ser incrementada pelo passo ate que o valor maximo (99) seja obtido 
(ou ultrapassado). 

O passo nao tern que ser 1; ele pode ser qualquer numero inteiro. Troque o passo na linha 20 
e reexecute o programa. Agora a declarapao de atribuipao e executada 20 vezes, desde que incre- 
mentando I 19 vezes em 5 chega a 95; a vigesima vez leva a 100, que e maior que 99. Mantendo o 
passo em 5, pode-se permitir que a declarapao de atribuipao seja executada 100 vezes aumentando 
o valor maximo de I para 500. Pode-se fazer essa modificacao? (Lembre-se de modificar tambem 
o DIM.) 
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0 tamanho do passo nao precisa ser positivo. Mas se for negativo, o valor inicial de I deve ser 
maior que o valor final. Por exemplo, se o passo e —1 e desejamos inicializar 100 elementos de 
A(l) com valores de 0 a 99, pode-se reescrever a declarapao na I inha 20 como segue: 


10 

DIM A( 

99) 

20 

FOR I= :: 

99 TO 0 STEP 

30 

Ad) =’I 


35 

PRINT 

A<I) 

40 

NEXT I 


50 

END 



Execute este programa para testar o passo negativo. 

Se o passo e 1 (esse e o caso mais frequente), nao e necessario explicitar a definipao do passo. 
Na ausencia de definipoes, o BASIC assume que o passo e 1. 

Pode-se especificar os valores inicial e final do fndice e o passo usando-se as expressoes que 
se desejar. Por6m, deve-se fazer isso, para nao complicar o programa desnecessariamente. Se for 
necessario calcular um desses valores, sera mais interessante fazer isso separadamente antes de 
iniciar o loop. 

Pode-se usar valores reais para os valores inicial e final do fndice e para o passo no Applesoft. 
Nao e necessario explicitar o fndice na declarapao NEXT dentro do Applesoft. Porem, se isso for 
feito, tornarS o programa mais facil de ser entendido. 


Loops Aninhados 


A estrutura FOR-NEXT e chamada de loop do programa, porque a execupao do programa vai do 
FOR ao NEXT, volta ao FOR, e fica em cfrculos. Esse tipo de estrutura e muito comum; quase 
todos os programas que se escrevem usando BASIC tern uma ou mais delas. Os loops sao tao co- 
muns que muitas vezes eles compoem estruturas aninhadas, uma dentro da outra, tal como sao 
armazenados jogos de panelas, uma dentro da outra. Pode haver qualquer numero de declarapoes 
entre urn FOR e um NEXT. Frequentemente existem dezenas e ate centenas de declarapoes. 
E dentro dessas dezenas ou centenas, outros loops podem ocorrer. 0 exemplo abaixo mostra um 
nfvel simples de aninhamento: 


10 

DIM A< 99) 


20 

FOR 1=0 TO 

99 STEP 

30 

A < I) * I 


40 

REM MOSTRA 

TODOS OS 

50 

FOR J*0 TO 

I 

60 

PRINT A(J) 


70 

NEXT J 


80 

NEXT I 


90 

END 



•JA DADOS 


Frequentemente aparecem estruturas complexas de loop, mesmo em programas relativamente 
pequenos. Aqui esta um exemplo, mostrando as declarapdes FOR e NEXT, mas sem as declara¬ 
poes intermedicirias: 
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FOR 1=1 TO 10 

FOR X=25 TO 347 STEP 3 

FOR A=9 TO 0 STEP -1 


NEXT A 

FOR B=25 TO 100 STEP 5 


NEXT B 
NEXT X 


FOR V=1 TO 20 STEP 2 

FOR P=10 TO 20 

NEXT P 
NEXT V 

FOR 2=1 TO 10 

NEXT Z 

NEXT I 


0 loop mais externo usa a variavel mdice I; ele contem tres loops aninhados que usam os indices 
X, Y e Z. 0 loop X contem dois loops adicionais usando mdice P. 0 ioop Z nao contem loops 
aninhados. 

As estruturas de loop sao muito faceis de visualizar e usar. Existe apenas um erro muito 
comum que deve ser evitado; nao terminar um loop externo antes de terminar um interno. Por 
exemplo, a seguinte estrutura de loop 6 ilegal: 


f 50 FOR 1=1 TO 10 

.60 FOR X=25 TO 347 STEP 3 


100 NEXT I 


200 NEXT X 


Todo o programa deve ter algumas declaragoes FOR e NEXT, desde que todo loop inicia 
com a declaraqao FOR e termina com NEXT. 

Por exemplo, suponha que exista uma declaragao FOR e duas NEXT. 0 primeiro NEXT 
termina o FOR de forma que o loop opere corretamente. Porem o segundo NEXT naocompleta 
nenhum FOR, o que causa um erro. 
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Se nao se inclui a variavel fndice na declaracao NEXT em um programa no Applesoft, a 
logica do programa automaticamente termina os loops corretamente, uma vez que so existe uma 
possibilidade de finalizar um loop a cada vez que um NEXT e encontrado. Caso haja duvidas 
sobre isso, veja o exemplo complexo mostrado na pagina anterior. Fapa estudos adicionais envol- 
vendo estruturas mais complexas. 


DECLARAgOES DE SUB-ROTINAS 


Quando se comeca a criar programas de tamanho maior, logo se percebe que existem pedacos de 
programa que sao necessarios mais de uma vez dentro da estrutura. Por exemplo, suponhamos 
uma variavel arranjo (A( )) que deve ser reinicializada em diferentes pontos do programa. Pode-se 
repetir as tres instrugoes que compoem o loop varias vezes, porque sao poucas instrucoes. 

Suponhamos agora que o loop tenha dez ou doze instrucdes que processam dados de algu- 
ma forma antes de fazer a inicializagao. Se tal loop precisar ser usado dentro do programa em 
varios pontos, redigitar todas as instrucoes toda vez que elas sao necessarias pode exigir muito 
tempo, e mais importante, gastar memoria. Este conceito e ilustrado no exemplo abaixo: 



Que tal separarmos as determinates que se repetem e usa-las em separado? 

Isso e precisamente o que e feito; o grupo de declaracoes em separado que e acessado dessa 
forma chama-se sub-rotina. 

Mas aparece um problema. Pular do programa para a sub-rotina e facil; ela tern um endereco 
inicial especffico. Mas, no fim da sub-rotina, como se pode voltar? 

Pode-se executar um GOTO em qualquer ponto em que se deseja ir para a sub-rotina. Isso e 
ilustrado como segue: 
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Infcio do 


programa 



etc. 


Numeros de linha escolhidos arbitrariamente 


10 



Infcio 


Fim 


Mas, no final da sub-rotina, como voltar? Se duas ou mais declaragoes GOTO vao para a 
mesma sub-rotina, existem dois ou mais lugares para voltar apos concluf-la. A solupao e se usar 
declaragoes especiais. No lugar de pular para a sub-rotina usando GOTO, usa-se uma declarapao 
GOSUB. 


A Declarapao GOSUB 

Esta declaracao salta da mesma forma que o GOTO, porem alem disso ela se lembra para onde 
deve voltar. Em "computes" dizemos que GOSUB chama uma sub-rotina. Isso pode ser ilustrado 
como segue: 


Sub-rotina 
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A sub-rotina finaliza com uma declarapao RETURN. Esta declarapao faz um salto de volta para a 
declarapao que vem depois do GOSUB. Se o GOSUB era a ultima declarapao de uma linha, o pro- 
grama retorna para a primeira declarapao da linha seguinte. 

0 loop de tres declarapoes que inicializa o arranjo A( ), se convertido para sub-rotina fica 

assim: 


1 0 R E M P R 0 G R A M A P R IN CIP A L 
20 REM PODE-SE DIMENSI0NAR AS MAR TAME IS 
30 REM DA SUBROTINA NO PROG.PRINCIPAL 
40 REM E UMA BOA I! DEI A DTMENSIONAR TOD AS 
50 REM AS OAR IAVEIS NO INIC10 DO PROGRAMA 
60 DIM A(99) 

70 GOSUB 2000 

SO REM MOSTRA ALGO PARA MOSTRAR FIM CERTO 
SO PRINT "VOLTOU" 

100 END 

2000 REM SUBROTINA 
2010 FOR I»1 TO 99 
2020 A ( I) •" I 
2030 PRINT A < I) 

2040 NEXT I 
2050 RETURN 


Declarapao POP 

Sob certas circunstancias, pode-se nao desejar voltar de uma sub-rotina para o ponto de onde ela 
foi chamada. Nesse caso se poderia tentar usar um GOTO para retornar, porem isso pode causar 
problemas, porque o BASIC retem na memoria o enderepo em que deveria voltar. Nesses casos 
deve-se usar a declarapao POP. De outra forma corre-se o risco de se obter um erro devido a acu- 
mulapao de enderepos de retorno nao usados por declarapoes RETURN. Tudo o que o POP faz e 
mandar o BASIC esquecer o ultimo enderepo de retorno guardado. Assim pode-se usar um GOTO 
para ir para qualquer outro lugar no programa. 

Contornar o RETURN constantemente, usando POP's em demasia para liberar sai'das de 
sub-rotina atraves de GOTO nao e uma pratica muito aconselhavel, uma vez que torna o programa 
bastante confuso. 


Sub-rotinas Aninhadas 

As sub-rotinas podem ser aninhadas. Quer dizer, uma sub-rotina pode, por sua vez, chamar outra 
sub-rotina etc. Nao e necessario dar instrupoes especiais para que isso aconteca. Simplesmente e 
preciso dar-se a declarapao GOSUB e finalizar a sub-rotina com RETURN. 0 BASIC se lembrara 
o numero da linha correto para cada sub-rotina aninhada. 

0 programa seguinte ilustra sub-rotinas aninhadas: 
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10 REM PROGRAMA PRINCIPAL 
20 REM RODE-BE DIMENS.IONAR AS UARIAOEIS 
30 REM DA SUBROTINA NO PROG.PRINCIPAL 
40 REM E UMA BOA IDEIA DIMENSIONAR TODAS 
50 REM AS OAR T. AOEIB NO I NIC 10 DO 
60 REM PROGRAMA PRINCIPAL. 

70 DIM A<99) 

80 GOSUB 2000 

90 REM MOSTRA ALGO PARA INFORMAR RETORNO CORRET0 
100 PRINT "ACABOU" 

110 END 

2000 REM SUBROTINA DE PR IMEIRO NIVEL 

2010 FOR 1=0 TO 99 

2020 A < I} I 

2030 GOSUB 3000 

2040 NEXT I 

2000 RETURN 

3000 REM SUBROTINA ANINHADA 

3010 PRINT A<I) 

3020 RETURN 


Este programa move a declaragao PRINT A(I) para fora da sub-rotina da linha 2000 e a coloca 
numa sub-rotina aninhada, na linha 3000. Nada mais mudou. 

Enquanto seja aceitavel e ate desejavel que uma sub-rotina possa chamar outra, ela nao pode 
chamar a si propria. Nem uma sub-rotina pode chamar outra que por sua vez chame a primeira. 
Isso e chamado recursividade e nao e permitida dentro do BASIC no Apple II. 


Declaragao GOSUB Calculada 

As logicas do GOTO e do GOSUB sao muito semelhantes. Elas so diferem no fato de que o GOSUB 
guarda o enderego de retorno para voltar. Assim, nao deve causar surpresa o fato de existir tam- 
bem uma declaragao GOSUB que opere de forma similar ao GOTO calculado. O GOSUB calculado 
permite que se va para uma entre duas ou mais sub-rotinas dependendo do valor de uma expressao 
numerica. 0 GOSUB calculado tambem se lembra para onde deve voltar. Nao importa para qual 
sub-rotina ele va. Ao final da sub-rotina, chegando na declaragao RETURN, havera o retorno para 
o ponto inicial de chamada. 

Pode-se usar sub-rotinas aninhadas usando declaracoes GOSUB, da mesma maneira que se 
pode usar sub-rotinas aninhadas usando declaragoes GOSUB normais. 

Vejamos a seguinte declaragao do integer BASIC: 

> 1 0 0 G 0 S U B A * 5 00+20 0 0 
>110 REM 

A expressao na linha 100 e urn GOSUB calculado. Quando essa declaragao e executada, a 
logica do programa pula para a linha cujo numero e obtido calculando-se a expressao. Nesse 
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exemplo, pula-se para a linha numero 2000 se A=0, para a linha 2500 se A=1 e assim por diante. 
Se a linha cujo numero foi calculado nao existe, aparece a mensagem *** BAD BRANCH ERR. 

A versao Applesoft do GOSUB calculado opera de maneira semelhante a sua versao do 
GOTO calculado. Aqui esta um exemplo: 

"] 9 0 

11 00 ON A GOSUB 1 000 * 500 , 5000,2300 

'3T10 R E H 

Quando a declaragao da linha 100 e executada, se A=1 a sub-rotina que inicia na linha 1000 
e chamada. Se A=2, e chamada a sub-rotina que inicia na linha 500. Se A = 3, e chamada a sub- 
rotina que inicia na linha 500 e se A=4, e chamada a sub-rotina que inicia na linha 2300. Qualquer 
outro valor de A diferente de 1, 2, 3 e 4 faz o programa ir para a linha 110, sem desviar para ne- 
nhuma sub-rotina. 


EXECUQAO CONDICIONAL 

As declaragoes GOTO e GOSUB condicionais sao declaragoes condicionais. Isto e, a seqtiencia de 
execugao do programa depende dos valores de uma ou mais variaveis que podem mudar durante 
a execugao do mesmo. O fluxo do programa depende da condigao de variaveis. 


Declaragao IF-THEN 

Outra declaragao condicional e a declaragao IF-THEN. Ela tern a forma geral: 

IF expressao THEN dec/aracao 

Se a expressao e verdadeira, entao a declaracao e executada. As expressoes relacionais e Booleanas 
sao muito comuns com declaragoes IF-THEN, embora expressoes aritmeticas possam ser usadas da 
mesma forma. Isso da ao programa BASIC um poder real para tomar decisoes. Aqui estao tres 
exemplos simples de declaragoes IF-THEN: 

10 IF A«B+5 THEN PRINT MSG* 

-40 IF rHEN CN--0 

50 IF Q<1A AND M<M1 THEN GOTO 66 

A declaragao na linha 10 causa a execugao da declaragao PRINT se o valor da variavel A 
for igual ao valor da variSvel B mais 5. Em outro caso a declaragao PRINT nao e executada. 

A declaragao da linha 40 atribui o valor numerico 0 a variavel IN se a variavel cordao CC$ 
for a letra M. 

A declaragao da linha 50 causa o desvio do programa para a linha 66 se a variavel Q for me- 
nor que 14 e a variavel M for menor que Ml. De outra forma, a execugao do programa continua 
na linha seguinte. 

Se houver dificuldade de entender a expressao que segue o IF, volte a discussao de expres¬ 
soes dadas antes neste capftulo. 

Uma declaragao IF-THEN pode ser seguida por outras declaragoes na mesma linha de pro¬ 
grama. Qualquer declaragao posterior na mesma linha de programa e sempre executada, nao impor- 
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tando se a expressao do IF-THEN e verdadeira ou falsa. Podemos ver isso no exemplo: 

10 IF 0>1000 fHEN PRINT "CONPLETO"sGOSUB 2000 
20 T-T+Us PR INT T 

No exemplo acima, o programa imprime a expressao COMPLETO apenas quando a variavel 
V e maior que 100. 0 programa chamara a sub-rotina na linha 2000, nao importa qual seja o valor 
de V. 

0 Applesoft executa a declarapao que segue o IF-THEN na mesma linha apenas quando a 
declarapao for verdadeira. Se a expressao e falsa, a execupao do programa pula para baixo para a 
proxima declarapao da linha seguinte. No exemplo acima, o programa imprime a expressao COM¬ 
PLETO e vai para a sub-rotina na linha 2000 apenas se V for maior que 100. Se V for menor ou 
igual a 100, o programa nao imprimira a mensagem nem ira para a sub-rotina, indo diretamente 
para a declarapao da linha 20. 

Existe uma forma especial da declarapao IF-THEN no Applesoft. Sempre que a atitude a ser 
tomada condicionalmente for uma declarapao GOTO, pode-se omitir a palavra THEN se desejado. 
As duas declaracoes seguintes sao equivalentes: 

■J10 IF MN*«DD* i'HE:N GOTO 100 

e o mesmo que: 

110 IF MM*=DD* GOTO 100 

DECLARACOES DE ENTRADA E SAIDA 

Existe uma variedade de declarapoes no BASIC que controla a transference de dados de e para o 
computador. A colepao delas e chamada de declaracoes de entrada/safda. As declarapoes de entra- 
da/safda mais simples controlam a entrada de dados pelo teclado e a safda para a tela. Discuti- 
remos essas declarapoes nos paragrafos que seguem. Porem, existem declaracoes de entrada/safda 
mais complexas que controlam a transference de dados entre o computador e dispositivos perife- 
ricos, tal como o gravador cassette, o drive de disco e a impressora. Essas declarapoes mais com¬ 
plexas sao tratadas nos Capftulos 4 e 5. O Capftulo 6 trata de declarapoes de safda na tela para 
graficos. 

Ja vimos a declaracao PRINT, que faz sair dados para a tela. Entao, vamos ver esta decla¬ 
rapao primeiro, antes das declaracoes de entrada. 


Declarapao PRINT 

Por que usar PRINT no lugar de DISPLAY ou outra abreviacao da palavra display? A resposta vem 
dos anos sessenta, quando a linguagem BASIC foi criada, os vfdeos eram muito caros e em geral 
inacessfveis aos computadores de medio e baixo custo. Os terminais mais comuns para compu- 
tadores tinham um teclado e uma impressora. A informacao em geral era impressa ao inves de 
mostrada num vfdeo, tal como nos dias de hoje. Assim a palavra PRINT, "imprima" em ingles, 
descreve a declaracao que faz mostrar informacao na tela do vfdeo. 

A declaracao PRINT mostra texto e numeros. Por exemplo, a declarapao seguinte vai mostrar 
na tela a palavra TEXTO: 
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10 PRINT "TEXTO" 

Para mostrar numeros, coloca-se um numero, ou o nome de uma variavel apos a palavra 
PRINT, como aqui: 

> A = :: 1 0 

>PRINT 5/A 
5 10 

A declaragao acima mostra o numero e o numero constante na variavel A, que e 10, na mes- 
ma linha. 

Pode-se mostrar uma mistura de textos e/ou numeros, listando a informagao a ser mostrada 
apos a declaragao PRINT. Usa-se vfrgulas para separar cada item. A declaragao PRINT a seguir 
mostra as palavras UM, DOIS, TRES, QUATRO e CINCO, seguidas do numeral que representa 
cada numero: 

1 0 PRINT UM " / 1 , "DOIS " , 2 x "TRES " x 3 x "QUATRO" x A r "CINCO" x 5 
20 END 

Pode-se separar as variaveis com vfrgulas, como feito acima, de forma que o Apple II automa- 
ticamente aloca um numero fixo de espagos para cada variavel mostrada. Tente executar a decla¬ 
ragao acima em modo imediato para ver por si proprio. Se for desejado eliminar os espagos em 
branco, basta separar as variSveis com o sinal ponto-e-vfrgula (;), como abaixo: 

1 0 PRINT "UM" “x 1 x "DOIS" " 2 ? "TRES" ? 3 5 "0UATR0" ? 4? "CINC0" 5 5 
20 END 

Tente tambem esta variagao para ver como o ponto-e-vfrgula funciona. 

Uma declaragao PRINT automaticamente retorna o cursor para a margem esquerda e desce 
uma linha depois da ultima agao. Em "computes" diz-se que foi dado um carriage return (retorno 
do carro). Pode-se suprimir o retorno do carro colocando uma vfrgula ou ponto-e-vfrgula apos o 
ultimo item da lista do PRINT. Uma vfrgula nessa posigao move o cursor para a proxima locali- 
zagao onde um valor seria mostrado, caso existisse. Para ver isso, digite o programa seguinte e 
execute-o digitando RUN: 

10 PRINT "UM" x *1 
20 PRINT "DOIS"x2 
30 END 

Agora coloque uma vfrgula ao final da declaragao na linha 10 e reexecute o programa com 
RUN. Ve-se entao a concatenagao da linha 20 com a linha 10 na mesma linha da tela. 

Em seguida substitua a vfrgula da linha 10 com o ponto-de-vfrgula e rode o programa com 
RUN. As duas linhas sao concatenadas de novo, porem o espago entre o numeral 1 e a palavra 
DOIS foi removido. Trocando outras vfrgulas por pontos-e-vfrgulas pode-se ir retirando os espagos 
em branco existentes entre os itens. 

Mostramos os numerais colocando-os diretamente na declaragao PRINT. Pode-se alem disso 
mostrar numerais como conteudo de variaveis. O programa seguinte fara o mesmo que o primeiro 
exemplo da declaragao PRINT, porem usa o arranjo A( ) para criar os dfgitos. Tente colocar o 
programa e roda-lo. 


PROGRAMANDO EM BASIC 


91 


5 DIM A (5) 

10 FOR 1*1 TO 5 
20 A (I) =-1 
30 NEXT T 

40 PR INT "UM"?A<1)5"DOIS"? A<2)?"TRES"5A<3)?"QUATRO"?A(4> 
"CT.NCO" ? A (5) 

50 END 

No Applesoft, podem-se colocar as palavras a serem mostradas numa variavel cordao e colo- 
car a declaragao PRINT dentro de um loop FOR-NEXT, alterando o programa como mostrado 
abaixo: 


10 DATA "UM" , "DOT.S" , "TRES" .* "OUATRO" , "CINCO" 
20 FOR 1*1 TO 5 
40 READ Hi 
50 PRINT N*5l? 

60 NEXT I 
70 END 


Declaragao INPUT 

Quando uma declaragao e executada, o computador espera por entrada de informagao pelo tecla- 
do; enquanto nao for colocada a informagao desejada, tudo fica parado. 

Na sua forma mais simples, a declaragao INPUT inicia com a palavra INPUT seguida do nome 
da variSvel. 0 dado entrado pelo teclado e atribufdo aquela variavel. O tipo do nome da variavel 
determina o tipo de dado que deve ser colocado. Um nome de variavel numerica 6 satisfeito com 
uma variSvel numerica. Para mostrar a entrada numerica, digite o programa seguinte e execute-o 
(tente colocar letras e veja o que acontece): 

10 INPUT A 
20 PRINT A 

25 REM FIH DE PROGRAMA BE ACHAR 0 
30 IF A=0 THEN END 
40 GOTO 10 

Na execugao da declaragao INPUT, o computador mostra um ponto de interrogagao, e espe¬ 
ra a entrada do dado. No programa acima, aparece cada tecla tal como foi digitada. Em "com¬ 
putes" a tela ecoa o teclado. Alem disso, o numero e mostrado duas vezes devido a declaragao 
PRINT na linha 20. A primeira aparigao do numero ocorre na execugao da declaragao da linha 
10, quando se faz uma digitagao pelo teclado. A segunda aparigao ocorre em respostas a decla¬ 
ragao da linha 20, o PRINT. 

A declaragao INPUT pode entrar mais de uma variavel de uma so vez. Para isso, liste todas 
as variSveis que deseja entrar depois da palavra INPUT. Separe as variaveis com vfrgulas. Quando 
esse INPUT e executado, deve-se responder com um valor para cada variavel. Certifique-se que o 
valor digitado seja do mesmo tipo da variavel associada a ele. 

Quando se responde a uma declaragao INPUT, nao utilize vfrgulas para pontuar numeros 
grandes; entre 1000 e nao 1.000. 
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0 exemplo seguinte entra dois valores numericos mostrando em seguida o que foi entrado: 

20 INPUT A> B 
30 PRINT A 7 B 

35 REM FIM DE EXECUCAO QUANDO ENTRA 0 
40 IF AO OR BO THEN END 
50 GOTO 20 

Rode o programa acima e tente entrar um numero seguido por vfrgula, depois outro numero, 
e em seguida a tecla RETURN. Agora tente algo um pouco diferente. Entre um numero e digite 
a tecla RETURN. Como se pode ver, o Apple II informa que se deve digitar o outro numero. Entao 
coloque o outro numero e acione RETURN. Vemos assim que quando a declaragao INPUT pede 
mais de um valor num6rico, existe a escolha de se digitar tudo dentro de uma mesma linha ou em 
linhas separadas. 

A declaragao INPUT opera de uma forma um pouco diferente quando se trata de variaveis 
tipo cordao no Integer BASIC. Antes de tudo, ele nao coloca o ponto de interrogagao; tente o 
exemplo: 


10 DIM A$<19) 

20 INPUT M 
30 PRINT A$ 

35 REM FIM DE PROGRAMA COM ENTRADA NUL..A 
40 IF A $ ::: " " THEN END 
50 GOTO 20 

Na execugao do programa acima, tente entrar um cordao com mais de 19 caracteres. Apare- 
cera a mensagem *** STR OVFL ERR e o programa parara. 0 comprimento do cordao entrado 
nao pode exceder o comprimento maximo da variavel cordao usada como variavel no INPUT. 

0 Integer BASIC forga que se entre cada variavel numa linha diferente. Se a declaragao 
INPUT especifica uma lista de variaveis, e existem variaveis tipo cordao na lista, os valores tipo 
cordao respectivos devem ser entrados em linhas diferentes. Isso acontece porque o Integer BASIC 
permite que se coloquem vfrgulas como parte da variavel cordao. Veja isso rodando o exemplo 
acima e colocando a variavel PAO, MANTEIGA. 0 exemplo seguinte mostra o que acontece 
quando uma variavel cordao faz parte de uma declaragao INPUT no Integer BASIC. Tente com 
este programa; tente entrar todos os quatro valores na mesma linha, separados por vfrgulas. 0 que 
aconteceu? Tente colocar cada valor numa linha diferente. Veja o que acontece quando se tenta 
entrar um valor numerico ou vfrgula como parte de um valor tipo cordao. 

10 DIM A*<10) 

20 IMPUT A$rA?B$vB 
30 PRINT A$ r A r B$ * B 

35 REM FIM DE PROGRAMA COM ENTRADA NUL..A 
40 IF A$= :: ""THEN END 
50 GOTO 20 

Como foi discutido antes, qualquer variavel real pode ter um valor inteiro no Applesoft. 
Assim pode-se entrar um numero inteiro para uma variavel real. Um valor real entrado para uma 
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variSvel inteira e convertido para valor inteiro de acordo com as regras de truncagem apresentadas 
na segao "Expressoes do Tipo Misto" neste capftulo. 


Caracteres da Declaragao INPUT 

A declaragao INPUT e muito fastidiosa; sua sintaxe 6 pesada para qualquer operador humano 
normal. Imagine um operador novato de escritorio que nao entenda nada de programagao; encon- 
trando os tipos de mensagens de erro que aparecem se uma vfrgula e colocada fora de lugar, certa- 
mente ele ficara desesperado. Em vista disso, pode-se perder muito tempo escrevendo programas 
"a prova de idiotices" na entrada de dados. Esses programas devem prever todos os tipos de 
enganos que se possam cometer na digitagao de dados, e devem responder aos erros de forma 
simples e incisiva de maneira que o operador possa entender. No Capftulo 4 se descrevem essas 
tecnicas de programagao de entrada de dados em detalhes. 

Uma forma interessante de orientar o operador na declaragao INPUT e sua habilidade de 
colocar uma pequena mensagem que descreve a entrada desejada. Chamamos essa mensagem de 
mensagem de entrada. Ela aparece na declaragao INPUT como um cordao entre aspas, e e colocada 
a frente da entrada desejada. Essa mensagem permite colocar vSrias variaveis dentro de uma mesma 
declaragao INPUT, auxiliando a memoria sobre o que deve ser entrado. 

No Integer BASIC, coloca-se a mensagem imediatamente apos a palavra INPUT, e segue-se 
a lista de variaveis. Quando a lista contem mais de uma variavel, a mensagem aparece apenas uma 
vez, na primeira linha de entrada. Se a primeira variavel da lista 6 numerica, aparece um ponto de 
interrogagao apos a mensagem. Se a entrada for cordao, nao aparece a interrogagao. Aqui esta um 
exemplo: 


10 DIM M (10) 

20 INPUT "ENTRE SEU NOME! E IDADE ", A*, A 
30 PRINT A*J" TEM"'A 

35 REM "ENTRADA NULA=FIM DE PROGRAMA" 

40 IF A*=0 THEN END 
50 GOTO 20 

No Applesoft, coloca-se a mensagem apos a palavra INPUT. Ela e seguida por dois pontos e 
depois vem a lista de variaveis. A existencia de dois pontos suprime o ponto de interrogagao. A 
mensagem aparece apenas uma vez, mesmo que seja necessaria mais de uma linha para entrar 
todas as variaveis. 

Aqui esta um exemplo em Applesoft: 

20 INPUT "ENTRE SEU NOME E IDADE:";A$,A 

30 PRINT A$?"TEM"?A 

35 REM "USE CTRL-C PARA FINALIZAR" 

50 GOTO 20 


A Declaragao GET 

A declaragao GET, disponfvel apenas no Applesoft, entra um unico caractere do teclado. Esse 
caractere nao aparece na tela. Nao e preciso digitar o Return apos a digitagao. Essa entrada e 
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tratada como uma variSvel cordao ou como um valor numerico, dependendo da variSvel que segue 
a palavra GET. Digite o seguinte programa e execute-o: 

10 GET A$ 

20 PRINT At 

25 REM "BE A ENTRADA FOR E, FIM DE PROGRAMA" 

30 IF At=*"E" THEN END 
40 GOT010 

Pode-se fazer a declaragao GET esperar por um caractere especffico, testando a entrada, como 
segue: 

10 GET A* 

20 IF A$< >"X" THEN GOTO 10 
30 PRINT At 
40 END 

Este programa espera pela digitagao da letra X. Fora isso nada acontece. 

Se a declaragao GET especifica uma variavel real ou inteira a entrada deve ser numerica. Em 
caso contrario ocorre uma mensagem ?SYNTAX ERROR e o programa para. Devido a esse e a 
outros problemas que podem ocorrer com a declaragao GET, em geral ela so e usada para receber 
caracteres tipo cordao. 

Os programas usam a declaragao GET mais frequentemente quando dialogam com o opera- 
dor. Por exemplo, um programa pode esperar a decisao de um operador aguardando dele (ou dela) 
o caractere "S" para "SIM". Aqui segue um exemplo dessa logica: 

10 PRINT "OPERADOR, VOCE ESTA AI ?" 

15 PRINT "DIGITE SIM OU NAO" 

20 GET At 

30 IF At<>"Y" THEN GOTO 20 
40 PRINT "OK, VAMOS CONTTNUAR!" 

50 END 

Note que essa seqiiencia nunca mostra o caractere entrado no teclado. Tente reescrever o programa 
de forma que qualquer caractere digitado na declaragao GET seja mostrado na tela. 


EXECUQAO DE PARADA E CONTINUAgAO DE PROGRAMAS 

Se um programa estiver rodando e se desejar parS-lo, basta digitar CTRL e C simultaneamente. Se 
o programa estiver esperando por entrada de teclado atraves de uma declaragao INPUT, ao se acio- 
nar Ctrl-C, deve-se seguir com o acionamento da tecla Return. 

No Integer BASIC, aparece a mensagem STOPPED AT e o numero da linha onde parou a 
execugao do programa. Ele continua se for dado o comando CON. 

No Applesoft, a mensagem e BREAK IN seguida pelo numero da linha onde a execugao pa¬ 
rou ao se acionar CTRL-C. A execugao continua com o comando CONT. 
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A Tecla Reset 

E claro que se pode interromper o programa com a tecla RESET (ou CTRL-RESET em algumas 
versoes do Apple II). 

No Apple II Plus e no Apple II com o Language System instalado, o RESET tern o mesmo 
efeito que o CTRL-C. 

Nas versoes do Apple II sem o Autostart Monitor, o acionamento do RESET causa o apareci- 
mento do caractere de entrada do monitor ( * ). Se se estiver usando o Integer BASIC ou o Firm¬ 
ware Applesoft, digite CTRL-C para retornar para a linguagem que estava usando. Se o sistema for 
o Applesoft baseado em cassette, digite OG para retornar ao Applesoft. Se o sistema for Applesoft 
baseado em disco, digite 3DOG para retornar ao Applesoft. 

Caso se tente voltar incorretamente a partir de um RESET acidental, o programa em BASIC 
estara perdido. 


A Declarapao END 

0 programa para sua execugao quando encontra a declarapao END, como foi descrito anterior- 
mente, neste capftulo. 

Nao se pode continuar a executar o programa, se for encontrado em END no Integer BASIC. 


A Declarapao STOP 

0 Applesoft tern outro comando que para a execugao do programa quando encontrado: o coman- 
do STOP. Quando o Applesoft executa o comando STOP, aparece a mensagem BREAK IN seguida 
pelo numero da linha onde o programa parou. 

Pode-se continuar a execugao digitando CONT. 


A Declarapao WAIT 

0 Applesoft tern uma declarapao que permite especificar uma pausa na execugao do programa. A 
declarapao WAIT faz o programa parar ate que a posicao de memoria especificada tenha um valor 
tamb6m especificado. Pode-se, por exemplo, parar o programa ate que alguem aperte o botao no 
controlador de jogo 1. Aqui esta como: 


10 

R E M ES 

PERA POR BOTAO NO ' 

CONTROLADOR DE . 

JOGO 1 

20 

PRINT 

"ACIONE 0 BOTAO NO 

CONTROLADOR DE 

JOGO 1 

30 

WAIT - 

16286r128 



40 

PRINT 

"BANG!" 



SO 

FIND 





Consulte o Capftulo 8 para maiores detalhes sobre a declarapao WAIT. 
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FUNCOES 


Outro elemento do BASIC e a funpao, que de certa forma se parece com uma variavel, mas pode se 
comportar mais como uma declaracao BASIC. 

Talvez a melhor forma de se entender o que a funcao faz e atraves de urn exemplo. Na decla- 
rapao seguinte: 

310 A*SQR<B) 

a variavel A e colocada como a raiz quadrada da variavel B. 0 SQR especifica a funpao raiz quadra- 
da. Veja a seguinte funcao em cordao: 

20 l_ L EN < D$) 

Nesse exemplo, a variavel L e colocada como sendo o comprimento da variavel D$. 

As funpoes podem substituir variaveis ou constantes em qualquer lugar numa declarapao 
BASIC, a excepao da esquerda do sinal de igual. Em outras palavras, pode-se dizer A=SQR(B), 
mas nao e permitido dizer SQR (A) = B. 

Em seguida veremos como funcionam as funpoes e como usa-las. Mostraremos aqui urn 
sumario incompleto das funpoes permitidas no Integer BASIC e no Applesoft. Uma descripao 
completa das funpoes foi colocada no Capftulo 8. Muitas das funpoes nao sao permitidas no 
Integer BASIC. Isso serS indicado no momento apropriado. 

Especifica-se a funpao atraves de uma palavra reservada apropriada (como SQR para raiz 
quadrada), seguida por urn argumento ou argumentos entre parenteses. No caso de A=SQR(B), 
SQR requer apenas urn argumento, que no caso e o valor de onde deve ser extrai'da a raiz quadra¬ 
da. Para L=LEN(D$), LEN especifica a funpao e o argumento D$, entre parenteses, que e o 
cordao do qual se obtem o comprimento. 

Na forma geral, qualquer funpao tera urn desses dois formatos: 


Argumento unico para a funpao 
que tenha apenas um argumento 


funpao (argl) 
funpao (argl, arg2) 

Dois argumentos para a funpao que 
necessita de dois argumentos 


Palavra reservada para especificar a funpao 


Poucas funpoes necessitam de tres argumentos. Cada argumento de funpao pode ser uma 
constante, uma variavel ou uma expressao. 
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Todas e cada uma das funpoes numa declarapao BASIC sao reduzidas a um unico valor nume- 
rico ou cordao antes que qualquer outra parte da declarapao BASIC seja calculada. Primeiro o argu* 
mento da funpao e calculado de acordo com as regras mostradas antes. Uma vez reduzido a um 
valor numerico ou cordao, aplica-se a funpao ao argumento, obtendo-se outro valor numerico ou 
cordao. A expressao nao e calculada ate que todas as suas funpoes sejam calculadas. Por exemplo, 
veja o seguinte exemplo: 

D10 B=24.7* < SQR(C)+5)-SIN(0.2+D) 

As funpoesSQR eSIN sao calculadas primeiro. Suponhamos SQR (0 = 6.72 e SIN(0.2 + D)=0.625. 
A expressao na linha 10 sera primeiramente reduzida para: 

24.7#<6.72+5)-0.625 

e depois esta expressao simples e calculada. 


FUNQOES NUMERICAS 

Aqui esta uma lista de funpoes numericas que podem ser usadas tanto em Integer BASIC quanto 
em Applesoft: 

SGN Retorna o sinal de argumento: +1 se argumento positivo, —1 se argumento nega- 
tivo, 0 para argumento zero. 

ABS Retorna o enderepo absoluto de um argumento. Um argumento positivo nao 
modifica; um argumento negativo e convertido para o positivo correspondente. 
RND Gera um numero aleatorio. Veja o Capi'tulo 8 para mais detalhes. 

Aqui esta uma lista de funcoes numericas que so podem ser usadas com o Applesoft: 

I NT Converte um argumento de ponto flutuante para seu inteiro equivalente. 

SQR Calcula a raiz quadrada de um argumento. 

EXP Eleva a constante "e" a potencia que e o argumento. 

LOG Calcula o logaritmo natural de um argumento. 

SIN Retorna o seno trigonometrico do argumento, em radianos. 

COS Retorna o co-seno trigonometrico do argumento, em radianos. 

TAN Retorna a tangente trigonometrica do argumento, em radianos. 

ATN Retorna o arco-tangente trigonometrico do argumento, em radianos. 


Usando Funpoes Numericas 

Deve-se usar as funpoes numericas tao cedo quanto possfvel, mas nao se preocupe com as funpoes 
que Ihe sao desconhecidas. Por exemplo, caso nao exista o conhecimento sobre o comportamento 
das funpoes seno, co-seno e tangente, nao e aconselhavel coloca-las nos programas, posto que elas 
perdem o sentido. 
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Aqui estao alguns exemplos que usam funpoes numericas: 

10 A==~234 
20 B-8GN (A) 

30 PRINT B 
AO END 

Na execupao deste programa, o resultado apresentado sera —1, porque —234 e negativo. Como 
exercfcio, troque a declarapao na linha 10 por INPUT. Troque a linha 40 para GOTO 10. Agora 
pode entrar uma variedade de valores de A e ver a funpao SGN funcionar. 

Aqui est2 um exemplo mais complexo usando as funpoes numericas do Applesoft BASIC: 

10 INPUT A 7 B 

20 IF LOG < A) < 0 THEN A=1/A 
30 PRINT SQR <A> * EXP <B) 

35 REM USE CTRL-C PARA TERMINAR 0 PROGRAMA 
AO GOTO 10 

Se houver domfnio completo de sua parte sobre a funpao logaritmo, troque a declarapao da linha 
20, substituindo a funpao LOG por outra funpao numerica qualquer. 


FUNgOES cordAo 

As funpoes cordao permitem o manuseio de dados tipo cordao numa variedade de formas. Pode 
nao ser necessSrio o uso de funpoes numericas desconhecidas, mas e necessario um esforpo para 
aprender todas as funpoes que operam com os cordoes. 

Aqui vai uma lista de funpoes que podem ser usadas tanto no Integer BASIC quanto no 
Applesoft: 

ASC Converte um cordao de caracteres no seu codigo padrao numerico 

(codigo ASCII) equivalente. 

LEN Retorna o numero de caracteres contidos num cordao de texto. 

Aqui estao as funpoes de cordao que so podem ser usadas com o Applesoft: 

STR$ Converte um valor numerico em um cordao de caracteres de texto. 

VAL Converte um cordao de texto em seu numero equivalente (se tal con- 

versao for possfvel). 

CHR$ Converte um codigo numerico (ASCII) em seu equivalente caractere 

de texto. 

LEFTS Extrai a parte esquerda do cordao de texto. Os argumentos da funpao 

identificam o cordao de texto e a parte da esquerda desejada. 

RIGHTS Extrai a parte direita do cordao de texto. Os argumentos da funpao 

identificam o cordao e a parte da direita desejada. 

MID$ Extrai uma parte do meio do cordao. Os argumentos da funpao identi¬ 

ficam o cordao e o pedapo desejado. 
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As fungoes tipo cordao permitem determinar o comprimento de um cordao, extrair parte de 
um cordao e converter valores numericos, codigos numericos (ASCII), e caracteres do cordao. 
Essas fungoes usam um, dois ou tres argumentos. Aqui estao alguns exemplos: 


STR$(14) 

LENC'ABC") 

LEN(A$+B$) 

LEFT$(ST$,1) 


Converte 14 para "14”. 

Retorna o comprimento do cordao. 0 numero 3 volta porque o cor¬ 
dao tern 3 caracteres. 

Retorna o comprimento da concatenagao dos dois cordoes. 

Retorna o caractere mais a esquerda do cordao ST$. 


Subcordoes do Integer BASIC 

Embora o Integer BASIC nao tenha fungoes que permitam extrair partes de um cordao, existe uma 
forma de faze-lo. Especifica-se a posigao inicial e o numero de caracteres num subcordao, como no 
exemplo que segue: 

•10 DIM A$(20) , B$<5) 

20 ,A) 

No exemplo acima, B$ e colocado igual aos quatro primeiros caracteres de A$. Pode parecer que 
atribuiu-se a B$ o valor de um dos elementos de um arranjo tipo cordao chamado A$, mas lembre- 
se de que o Integer BASIC nao permite arranjos tipo cordao, muito menos tais arranjos com duas 
dimensoes. Perceba bem que tal notagao se refere a um subcordao. 

0 primeiro valor entre parenteses e a posigao inicial do subcordao e o segundo valor e o 
numero de caracteres do subcordao. 


Concatenagao de Cordoes no Integer BASIC 

A fungao LEN permite que se concatene cordoes no Integer BASIC. Aqui esta um exemplo: 

*(10),C*<10> 


A fungao LEN 

permite que se 

10 

DIM A*(10 

20 

A* s#r VENT0 

30 

B $= =// INHA" 

40 

C*~"CATA" 

50 

A*(LEN(A* 

60 

PRINT A$ 

70 

C$ < LEN(C* 

80 

PRINT 

90 

END 


>RUN 

VENTOINHA 

GATAVENTOINHA 
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funqOes do sistema 

Para efeito de complementagao, as fungoes do sistema sao listadas abaixo. Elas executam opera- 
goes que nao terao maior interesse ate que se tenha experiencia em programagao. 

Aqui estS a lista de fungoes do sistema disponfveis: 

PEEK Pega o conteudo de uma posigao de memoria. 

FRE Retorna o espago livre disponfvel — o numero de bytes de memoria RAM. Nao 
permitido no Integer BASIC. 

USR Transfere a execugao para urn programa em linguagem assembler. Nao permi- 
tida no Integer BASIC. 


funqOes definidas pelo usuArio 

Alem das varias fungoes que sao disponfveis dentro do BASIC padrao, pode-se definir fungoes 
aritmeticas proprias do usuario no Applesoft, uma vez que elas nao sao muito complicadas. Fun¬ 
goes tipo cordao definidas pelo usuario nao sao permitidas. Uma declaragao DEF FN define a 
fungao. Chama-se a fungao com declaragao FN. Aqui esta um pequeno programa que usa a decla¬ 
ragao DEF FN: 

10 DEF FN PfX) a* 100*X 
20 INPUT A 
30 PRINT Ay FN P'A) 

35 REM USE CTRL-0 PARA SAIR DO PROGRAMA 
AO GOTO 20 

0 identificador da fungao segue a palavra reservada FN. As regras para batizar o identifi- 
cador sao as mesmas usadas para dar nomes a variaveis reais. No exemplo, usamos P, de forma 
que a fungao passou a se chamar FNP. Se o identificador fosse AB, o nome da fungao seria 
FNAB. 

A expressao aritmetica do lado direito do sinal de igual define a fungao. Quando se chama a 
fungao com a declaragao FN, a expressao e calculada (usando os valores correntes de qualquer 
variavel mencionada na expressao). 0 resultado numerico obtido e tratado da mesma forma que 
qualquer outro valor numerico no contexto onde a declaragao FN aparece. 

Na declaragao DEF FN, uma unica variavel deve seguir o identificador da fungao, e deve 
ser colocada entre parenteses. 0 nome da variavel e local, dentro da definigao da fungao; ele nao 
tern efeito fora da declaragao DEF FN. Pode-se usar o mesmo nome de variavel em qualquer outro 
local do programa sem afetar a fungao, e a variavel na fungao nao afetara outro nome de variavel 
identico em outro local dentro do programa. 

Em uso, a declaragao FN deve ser seguida pelo identificador da fungao, que deve ser seguido 
por uma constante numerica, variavel ou expressao entre parenteses. Quando o Applesoft encontra 
uma declaragao FN, ele atribui os valores da constante, da variavel ou da expressao as variaveis 
locais da declaragao FN. (0 valor de uma variavel fora da declaragao DEF FN que tenha o mesmo 
nome da variavel local nao e alterada.) Se a variavel local aparece na expressao que define a fungao, 
o Applesoft usa seu valor mais recentemente atribufdo para calcular a expressao. 
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funqOes aninhadas 

0 argumento de uma fungao pode ser uma expressao; a expressao pode conter fungoes. Em outras 
palavras, as fungoes podem ser aninhadas. Aqui esta um exemplo: 

10 INPUT A 

20 PRINT S6N( ABS ' A>> 

25 REM USE CTRL-C PARA FT.NALT.ZAR 0 PROGRAMA 
30 GOTO 10 
40 END 

Realize experiences criando declaragoes PRINT em modo imediato para fazer uso mais complexo 
das fungoes numericas e de cordao. 


4 

Programacao Basic Avancada 


Este capftulo continua as orientagoes do Capi'tulo 3 de como programar o Apple II em BASIC. 
Ele cobre outras declaragoes novas em BASIC e explora diferentes facetas das declaragoes ja vistas. 
0 Capi'tulo 3 mostrou como fazer seu Apple II realizar algumas fungoes interessantes; este capi'tulo 
mostra como torna-lo uma ferramenta realmente util. 


ACESSO DIRETO E CONTROLE 


Existem algumas declaragoes que permitem acessar diretamente o Apple II. Existem muitascoisas 
que se podem fazer atraves delas — como operar controladores de jogos, operar os alto-falantes e 
fazer pleno uso dos dispositivos perifericos. 


MEM6RIA E ENDEREQAMENTO 

0 Apple II pode ter ate 65.536 locais de memoria enderegaveis individualmente, sendo que cada 
um pode conter um numero variando entre 0 e 255 (este limite um tanto estranho e, na verdade, 
2 elevado ao expoente 8). Todos os programas e dados sao convertidos em sequences de numeros 
que sao armazenados nessa forma. 

Deve-se fornecer o enderego especi'fico de memoria para cada uma das seguintes declaragoes 
BASIC. Pode-se especificar o enderego com um numero, uma variavel ou uma expressao. Em qual- 
quer caso, ele deve ser calculado e referenciar um enderego de memoria real. Existem dois ende- 
regos validos para cada enderego de memoria. Um e positivo e inteiro entre 0 e 65.535. 0 outro 
e negativo e pode ser obtido subtraindo 65.536 do enderego positivo. Por exemplo, —32768 e 
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32768 sao o enderego da mesma posigao de memoria. Essa e uma posigao de memoria que o 
Integer BASIC nao pode acessar diretamente. Outra posigao de memoria e enderegada tanto por 
—1 quanto por 65535. Quando se recorda que o maior numero permitido no Integer BASIC e 
32767, pode-se ver a utilidade em usar numeros negativos para enderegar as posigoes de memoria 
mais altas. Se especificarmos um enderego de memoria no Applesoft com urn valor real, ele sera 
convertido a um valor inteiro para ser usado como enderego. 

PEEK e POKE 

A fungao PEEK permite ler o valor guardado em qualquer enderego da memoria do Apple II. 
Considere a seguinte declaragao: 

•10 A = PEEK <200* 

Esta declaragao atribui a variavel A o valor da posigao de memoria 200. 

A declaragao POKE coloca um valor numa posigao de memoria. Por exemplo, a declaragao: 

20 POKE 8000,A 

toma o valor da variavel A e guarda na posigao de memoria 8000. O valor a ser escrito na memoria 
pode ser um numero, uma variavel ou uma expressao com um valor final entre 0 e 255. 

Pode-se dar a declaragao PEEK em memoria de leitura e escrita ou apenas de leitura (RAM 
ou ROM). Porem o POKE so pode ser dado em memoria de leitura e escrita (RAM). Isso e evidente 
pois a caracterfstica basica da ROM e que ela somente pode ser lida, porem nao se pode gravar 
nada nela. 


Declaragao CALL 

Pode-se transferir o controle do BASIC para uma rotina em linguagem assembler com a instrugao 
CALL. Veja este exemplo simples de declaragao CALL: 

i 00 CALL A-1 

O controle e transferido para a posigao de memoria cujo enderego esta contido na variavel A1. 

A sub-rotina em linguagem assembler ou o programa pode ser um residente no Apple II 
(ROM) ou pode ser gerado pelo usuario. O Monitor tern uma sub-rotina intrmseca que limpa a 
tela, por exemplo. O Apendice D tern uma lista completa de sub-rotinas intrmsecas que podem ser 
uteis. 0 Capftulo 7 tambem faz referenda com mais detalhes ao monitor e a linguagem assembler. 


HIMEM e LOMEM 

A memoria do Apple II e usada de formas diferentes. Parte dela e usada para guardar o programa 
BASIC, parte para as variaveis do programa, outra parte para os programas que mexem com drives 
de disco (se estao sendo usados) etc. Uma parte da memoria e usada para graficos, como se vera 
mais tarde no Capftulo 6. 

As declaragoes HIMEM e LOMEM permitem reservar areas de memoria para programas em 
linguagem assembler e graficos de alta resolugao. 
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Aqui est2 um exemplo de cada uma destas declaragoes: 

50 HIMEM* 38400 
60 LOME!!Ms 12291 

Os limites superior e inferior sao dados automaticamente pelo Apple II pelas posicoes de memo- 
ria mais alta e mais baixa disponi'veis ao programa BASIC pelo equipamento Apple II particular. 
Deve-se redefinir estas posicoes no caso de se usar grafico de alta resolucao ou programas em lin- 
guagem assembler, o que sera visto em detalhes nos Capftulos 6 e 7. Para mais informacoes sobre 
o uso da memoria, veja o Apendice G. 


USANDO DISPOSITIVOS PERIFERICOS 


Quando se liga o Apple II, ele espera entrada de dados pelo teclado e os apresenta na tela. O tecla- 
do e o dispositivo de entrada padrao e a tela de vfdeo e o dispositivo padrao de safda. Todavia, 
como ja e sabido, o Apple II pode se comunicar com outros dispositivos de entrada e safda. Sao 

eles: 

• Gravador cassette para salvar e carregar programas (ou dados) 

• Drives de disco para guardar dados e programas 

• Impressora para copia permanente de dados e programas 

• Tabua Grafica para entrada de dados graficos desenhados a mao livre 

• Comunicagao com outros computadores. 

0 gravador cassette e conectado ao Apple II por intermedio de dois conectores especiais. 

Todos os demais dispositivos perifericos sao conectados atraves de circuitos eletronicos 
adicionais que se conectam aos slots internos do Apple II. Essas placas de circuito sao chamadas 
controladores, cartoes de interface, cartoes ou interfaces. Especifica-se que dispositivo se deseja 
usar atraves do numero do slot ao qual sera conectado o controlador. Existem oito slots, nume- 
rados de 0 a 7. A tela de vfdeo e sempre o slot 0. 


As Declaragoes PR# e IN# 

Para selecionar uma safda diferente usa-se a declaragao PR#. Para uma entrada diferente usa-se o 
IN#. O exemplo seguinte em modo imediato seleta o vfdeo como safda: 

PRttO 

Se o Sistema Operacional em Disco (DOS) nao esta presente, usa-se o PR#e o IN#da mes- 
ma forma em modo imediato e programado. Usando o PR#e o IN#em modo programado com o 
DOS presente e um pouco mais complicado. Deve-se usar a declaracao PRINT que coloca o carac- 
tere Ctrl-D seguido imediatamente pelo comando PR# ou IN#. As declaracoes seguintes dire- 
cionam a declaragao da safda PRINT para o slot 1. Atraves da interface deste slot, a safda ira para 
uma impressora ou qualquer outro dispositivo conectado ao cartao. 
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•100 D*«""sREM CTRL-D 

110 PRINT D$ r "PRttl" s REM SELECT ON A SLOT 1 (IMPRESSORA) 

Sem o DOS, pode-se usar alternativamente a declaragao seguinte: 

110 PRttl s REM SELECT. ON A BLOT 1 < IMPRESSORA) 

Veja que tanto o PR#como o IN# tern um parametro singular cada um. Este deve ser um 
valor numerico entre 0 e 7. Qualquer outro valor causara resultados inesperados. Se nao existe 
cartao de interface no slot selecionado por PR# ou IN#, o Apple II trava; o unico recurso sera 
acionar RESET. 


SAfDA DE PROGRAMA E ENTRADA DE DADOS 


Os programadores menos experientes logo descobrem que a parte de entrada e sai'da de um progra- 
maea parte mais delicada. 

Quase todo o programa usa dados que devem ser entrados pelo teclado. Serao suficientes 
as poucas declaragoes INPUT? Na maioria dos casos a resposta e nao. 0 que acontece se o ope- 
rador aciona acidentalmente a tecla errada — apos digitar dois ou tres dados? Um bom programa 
deve saber que o operador e humano e e provavel que cometa erros. 

Os resultados, por isso, nao podem ser simplesmente mostrados, por intermedio de um 
punhado de declaracSes PRINT. Um ser humano devera ler a informagao mostrada. A menos que a 
mensagem e o dado sejam projetados com cuidado, podera ser muito diffcil de ler e interpretar 
e, em consequencia, pode haver mal-entendido ou confusao total. 

Felizmente o BASIC do Apple II tern muitas caracterfsticas que permitem que se fagam 
entradas e safdas corretas. Descreveremos algumas dessas caracterfsticas antes de abordarmos as 
praticas de programagao especfficas para boas entradas e safdas. 

MAIS SOBRE A DECLARAQAO PRINT 

Normalmente a execugao de uma declaragao PRINT termina retornando o cursor para o infcio 
da proxima linha (com o carriage return ). Isso faz com que a proxima declaragao PRINT inicie 
com o primeiro caractere colocado na primeira posigao da proxima linha. Assim o programa 
seguinte apresenta uma coluna de 20 caracteres W como primeiro caractere em 20 linhas: 

> NEW 

>200 r 

>210 FOR T»1 TO 20 
>220 PRINT C$ 

>230 NEXT I 
>240 PRINT '’TIM" 

>250 END 
>RUN 
U 
U 
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Usando Ponto-e-Vfrgula 

Um ponto-e-vi'rgula (;) colocado depois de qualquer variavel na lista de parametros da declaragao 
PRINT causa o aparecimento do proximo caractere apos o ultimo caractere mostrado. Um ponto- 
e-vi'rgula seguindo a ultima (ou a unica) variavel na declarapao PRINT suprime o retorno a proxima 
linha. Dessa forma o programa seguinte mostrara 800 caracteres em 20 linhas de 40 colunas. 


> NEW 

>200 C$=-"U" 

>210 FOR f. ~ 1 TO B00 
>220 PRINT C 
>230 NEXT I 
>240 PRINT "FIH" 

>2SO END 

> R UN 

WWWWWWWWUWWWWWWWWWWWWWWWWWUWWWWWWWUIWWWWW 

uwwwwwwwwwwwwwwwwwwwwwwuwwwuwwwwwwwwwwww 

Ul 14 UJ W14 W 1414 W UJ UJ14 W UJ UJ W W14 UJ14 UJ14 W 1414 14 1414 UJ14 UJ 14 WWW 14 UJ Ul UJ U 
WWWWWMWWWWWWUWWWWUWWUUWWWWUWWWWWWWWWWWUU 
14WUU4WI.IWWWWUWUIWWWWWWWWWWWU14WUW14WWUH4WWUH4UW 
UJUJUJWUJUJUJUIUJUJUJUJUJUlUIUJUJUJUJUlUJUJUJUJUJUJUIUJUJUlUJUJUJUJUJUIUJUfUJU 
WWUU4UU4UW1414WUJWUIW14WWW14W14WWW141414UIWWWUH4WUUIWUIU 
14 ui w U) w UJ Ul UJ Ul Ul Ul UJ Ul UJ Ul U) Ul UJ UJ UJ UJ UJ Ul UJ W UJ 14 UJ UJ UJ Ul UJ Ul UJ Ul UJ Ul UJ UJ UJ 
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WWWUlWWWUiWWWWWWWWWWWWWWWWWWWWUWWWWWWWWWWW 
WWWWWWWWWWWWUJWWWWWWWWWWWWWWWUWWWWUWWWWWW 
UJ UJ UJ Ul W W UJ UJ UJ W UJ UJ UJ Ul UJ UJ Ul W UJ UJ UJ UJ UJ W Ul UJ UJ UJ ui ui UJ W W U) Ul W U) w ui u 
UUUUUUWUlUUUUIUUUklUUUMUUUUUUUUUIlilUlUUliJUUIUUUlli} 
U)Ull>IUUUUUjUUUIUUUUU)UUUUUUUUUU!UUUUIUU}UUUli)UUUU 

wwwwwwwwwwwwwwwwwwwwwwwwuwwwwwwwwwwwwwwu 

wwwwwwwwwwwwwwwwwuwwwwwwwwwwwwwwwwwwwwww 

UJ U W UJ Ul W UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ W UJ UJ UJ UJ U UJ UJ W UJ UJ UJ UJ Ul UJ UJ u 
UJ UJ W W UJ W UJ UJ UJ W UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ W UJ UJ UJ UJ UJ UJ w 
W UJ UJ W UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ U) UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ W UJ UJ UJ w 
UUJUJUUJUJUJUJUUJUJUJUJUJUJUUUJUJUJUJMUJUUJUJyUJUJUJUJUJUJUJUJIlJUJUJUJUJ 
FIM 

0 mdice do loop FOR-NEXT, a variavel I, e usada como contador para indicar o numero de 
W's a ser mostrado, no caso 800. Na primeira execugao do PRINT, uma nova linha e iniciada para 
a impressao do W. 0 ponto-e-vi'rgula evita o retorno para a linha seguinte, de forma que o cursor 
fica na posigao seguinte ao caractere mostrado. 0 segundo W e mostrado a frente do primeiro e o 
cursor vai uma posigao a frente. A sequencia continua ate o fim da primeira linha, quando entao o 

cursor se move para o im'cio da linha seguinte. Isso se processa durante 20 linhas (de 40 colunas 

cada). 

0 que imprime o FIM numa nova linha? Realmente nada; ele aparece no infcio da linha por- 
que o ultimo W mostrado foi colocado na ultima posigao da linha anterior. Troque o loop FOR- 
NEXT de 800 para 780 vezes e veja que o FIM sera mostrado adiante do ultimo W. Isso pode ser 
visto adiante: 

>200 C*-"UT 

>210 FOR I ::: 1 TO 780 

>220 PRINT C*? 

>230 NEXT I 
>240 PRINT "FIM" 

>250 END 

>RUN 

UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ Ul UJ UJ UJ W UJ UJ Ul UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ 
UJ UJ UJ UJ UJ UJ UJ UJ Ul UJ W UJ UJ UJ UJ UJ W UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ U) UJ UJ UJ W UJ UJ UJ UJ UJ UJ u 
W U) UJ W UJ U UJ UJ UJ W W Ul UJ UJ UJ UJ UJ UJ UJ Ul UJ UJ U UJ UJ U U! Ul UJ UJ UJ UJ U Ul UJ Ul U UJ Ul UJ 
UJ UJ UJ UJ UJ UJ W UJ UJ Ul W UJ UJ UJ U) UJ UJ W UJ UJ UJ UJ UJ UJ UJ UJ W W Ul UJ UJ UJ UJ UJ UJ UJ UJ UJ w u 
UJ UJ W UJ UJ UJ UJ U) UJ UJ Ul UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ W U) UJ UJ UJ W UJ UJ UJ Ul UJ UJ UJ UJ UJ 
Ul UJ UJ UJ UJ W UJ UJ UJ UJ UJ u UJ UJ U) UJ w u UJ UJ UJ UJ W W UJ UJ UJ UJ UJ UJ UJ UJ UJ Ul UJ UJ Ul UJ UJ u 
W UJ UJ U) UJ UJ UJ U UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ UJ U) UJ UJ w UJ UJ UJ W W UJ UJ UJ UJ UJ U UJ W UJ u 
UJ UJ UJ UJ W UJ UJ UJ UJ UJ W UJ UJ UJ UJ UJ W UJ UJ UJ UJ UJ UJ W UJ UJ UJ UJ UJ W UJ UJ UJ UJ Ul UJ UJ UJ UJ w 
WUJWUJWUJUUJUJWUUJUJUJWUJUJUWUJUJUJWUIWUJUJUJUJUJUJUJWUJUJUJUJUJWU 
Ul UJ UJ UJ W W UJ UJ UJ W W UJ UJ UJ UJ UJ UJ UJ UJ W UJ UJ W UJ UJ UJ UJ Ul UJ UJ UJ u UJ UJ U) W UJ UJ UJ UJ 
UJ UJ U) W UJ UJ UJ UJ UJ u UJ UJ UJ UJ UJ Ul UJ UJ UJ UJ UJ W UJ Ul UJ UJ UJ UJ UJ UJ Ul UJ UJ UJ UJ UJ UJ U UJ UJ 
UJ UJ UJ UJ UJ UJ UJ UJ W UJ UJ Ul UJ UJ UJ UJ UJ UJ W UJ U) UJ UJ UJ UJ UJ UJ W U UJ UJ U! UJ UJ UJ UJ UJ UJ UJ Ul 
UJ UJ UJ W UJ UJ UJ UJ UJ UJ UJ W W UJ UJ UJ UJ W UJ U) UJ UJ UJ UJ UJ UJ UJ W UJ UJ UJ UJ UJ UJ UJ W W UJ UJ u 
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yyyyyyu y y uj uj y uj y uj y w y w y y y u w w to y u u ui uj uj uj uj w y uj y y w 
w uj y w to to w u to uj to w u u u uj u ui u u u y w y u w y y y uj y ui uj u w y w uj u u 
w w uj uj w y uj uj to w uj uj uj uj uj w w uj to w to y y w w y y y y uj y y y y y y y ui y u 
y y y y w w y y y y y w y y u y y y y ui y w y y y y y y y y y y y y y y y y y uj 
y y w y uj y uj y y uj uj uj uj uj uj uj uj uj uj uj uj y uj uj uj uj uj uj uj uj uj uj uj uj y w y uj uj u 
w uj uj y y u uj y uj uj uj uj uj uj uj uj u uj uj uj y y uj uj uj uj uj y y y y ui y u> w uj uj uj ui uj 
y uj uj uj uj y y y y uj uj ui uj uj uj y uj uj uj uj f i: m 

0 ponto-e-vi'rgula concatena cordoes de dados mostrando itens, um atras do outro, sem 
espagos entre eles. Dados numericos tambem sao mostrados em formato de I inha contmua, sem 
espagos entre valores conti'guos. 

Para ver isso, troque o valor da variavel para um numero de apenas um di'gito. 0 programa 
sera assim: 


>200 05 

>210 FOR 1=1 TO 800 
>220 PRINT C? 

>230 NEXT I 
>240 PRINT "FIM" 
>250 END 

0 numero 5 e mostrado como segue: 


>RIJN 


•j U O \J •..} \.) \J \J lj 1 j •..} ■-} •:) O O \J vj '.i •,} 'J * J ■ J U -J 'J J •„] •'.) •..? •./ 1 J <J 

' j w wf *.J \J % j -.."j O \.J *--/ •../ \.i 3 -J ■..) •..} j lj l j i.) w lj •-./ iJ \J \ J \,j "J •_/ - J ■.} w 

b 5 b 5 b b b b 5 b b b b b b b 5 b b 55555555 55555 555 55555 
b b b b b b b b b b b b b b b b 5 5 b b 5 5 b 5 5 b 5 b b 5 5 b 5 b b b b 5 5 5 

vj t.J ’.J v.J J •../ -J \J ‘.J ■„) -J •'./ v.j b -.J -J •> w *-'i %J v? b -..J b 'J b •■'.} b -.J \ j %..* -J b v> 

b b b b 5 b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b 5 b b 5 
b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b 
bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb 
b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b 5 
b b b b b 5 b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b 5 
5555555555555555555555555555555555555555 
5 b 5 5 b b55 5b 5 5 5 ■j - J O w -... s • j w •..} iJ w 'J b w O ■../ •— 1 O -J • J • J 

• j 'j O O \j 'j 'j %j O s.V O * ■ J j ■,J \ j O •.,/ w *1..' ■ J -.j vj - j *.,j ■„) ’j \.j o o - J ■*. j >.j •„/ ij 

b b b 5 b 5 5 b b b b b b 5 b 5 5 b b b b b b b b b b 55555b 5 b b b b 5 5 

■ J \J j ',.J O *..*/ \J -.J \li U O ij i.J U b - J i.l %./ w ■-.* '.j iJ -.J O '.J •../ •./ w ij >J ij -..j •„/ ij J 

b b b b b b b 5 b b 5 b b b b b 5 b b b b b b b b b b b b b b b b b b b b b b b 
b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b 5 

■J *>.*/ - J w *. Ir ij ij IJ lj lj .j V.j i.j ij ij -J O l.i W lj lj ij -J lj lj vj lj ij 1 j lj l.j l.J ij lj ij lj lj lj -.J vj 

bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb 
bbbbbbbbb b 55b b b b 5b 5b555b b 5b b 5b b b b 5 b bb bb5 
FIM 
> 
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Agora troque o valor de C por -1: 

>200 0-1 

>210 FOR 1=1 TO 800 
>220 PRINT C? 

>230 NEXT I 
>240 PRINT "FI Y \" 
>250 END 
>RUN 


1 .. . -i ... -i ... 1 ... .i „. i... -i... -1... .-j ... i ... -i 
1 - 1 - 1-1 - 1 - 1 - 1 - 1 - 1 - 1-1 
1 - 1 - 1 - 1 - 1-1 - 1 - 1 - 1 - 1-1 
.-j... i.. f.. i.. ^ ... -j... i... i... 1 ... -i - -j 

1 - 1 - 1 - 1 - 1-1 - 1 - 1 - 1 - 1-1 
1 -1 -1 -1 - 1-1 — 1 — 1 - -1 - 1-1 
1-1 - 1-1 - 1 - 1 - 1 - 1-1 - 1-1 
•i - i - i - i-i - i-i - 1 - 1 - 1-1 
1 - 1 ~ 1 - 1 - 1 ~ 1 - 1 - 1 ~ 1--1 

1 .. . 1 .... 1 .... 1 .... 1 _... 1 ... 1 .... i ... 1 .... 1 

1 — 1-1 -1 - 1-1 -1 —1 -1 —1 
1 - 1 - 1 - 1 - 1 - 1 - 1 -1 - 1 - 1 
1-1 - 1-1 - 1-1 - 1-1 - 1-1 
1 - 1 - 1 - 1 - 1 - 1-1 - 1 - 1-1 
1 — 1 — 1—1 ....i 

1 - 1-1 - 1-1 - 1-1 - 1 - 1-1 
1 - 1 - 1 — 1 - 1 - 1 - 1 — 1 — 1-1 
...1 - i —■ i - i~i - 1 - 1-1 -1 
1 - 1 - 1 - 1 - 1 - 1 - 1 - 1-1 -1 
1 - 1 - 1 - 1-1 - 1 - 1 - 1 — 1-1 
1 - 1 - 1 - 1 -- 1 - 1 - 1 - 1 -- 1-1 
1 - 1-1 - 1 - 1-1 -1 -1 - 1-1 
•1 -1 - 1 -1 - 1 -1 - -i - -i - -i - -1 
1 - 1 — 1 - 1 — 1 - 1-1 — 1 - 1 - 1-1 
1—1 — 1—1 -1 -1 — 1 — 1 — 1—1 
• i ... i ... i ... i .. ... I ... .-j ... i ._ i ... -i 

1 - 1 - 1 — 1 - 1-1 — 1 - 1 - 1-1 
1 -1 - 1 ... - 1 ... i - 1 ... ■•{... I ... i ... i 

1 — 1 - 1 — 1 - 1—1 —1 — 1 — 1—1 
1 - 1 - 1 - 1 - 1 - 1 - 1-1 - 1-1 
• 1 - 1 - 1 - 1 - 1 - 1 -- 1 - 1-1 
1 - 1 - 1 - 1 -- 1 - 1 -- 1 - 1 -- 1--1 
•1 -1 —1 —1 - 1-1 —1 -1 —1 -1 
1-1—1-1-1-1 —1 -1-1 -1 
1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1-1 


1 -1 -1 - 1-1 -1 - 1 — 1—1 
1 - 1 - 1 - 1 - 1 - 1 - 1 - 1-1 
1 - 1 - 1 - 1 - 1 - 1 - 1 - 1-1 
1 - 1 - 1 - 1 - 1 - 1 - 1 - 1-1 
1 - 1 - 1 - 1-1 - 1-1 - 1-1 
1 - 1 — 1 - 1 - 1 - 1—1 - 1-1 
1-1 - 1 - 1 - 1-1 - 1 - 1—1 
1 - 1 - 1-1 - 1-1 - 1 - 1-1 
1 - 1 - 1-1 - 1 - 1-1 - 1-1 
1 - 1 - 1 - 1 - 1 - 1-1 -1 -1 
1 — 1-1 — 1 — 1 - 1 — 1 — 1—1 
1 ... 1 ... *1 ... i ... 1 ... >1 ... 1 ... 1 ... -1 
•j ...1 ... -| ... 1 ...-1 .. .1 ...1 ...1 
1 - 1 - 1 - 1 - 1 1 - *1 - 1 - 1 
1 - 1-1 - 1 - 1 — 1 - 1 - 1 - 1-1 
1-1 - 1-1 - 1 - 1-1 - 1 - 1-1 
1 • 1 - 1 - 1 - 1 ~ 1 - 1 -1 - 1 - 1 
1 - 1-1 - 1 - 1-1 - 1 - 1 - 1-1 

1 - 1-1 - 1 - 1 - 1 - 1 - 1 - 1-1 
^ l - 1 - l - l - l - l - l - l-l 

•■j ^ - t -1 -.-1 -I - 1 - 1-1 
1 - 1 - 1 - 1 - 1 - 1 - 1 - 1-1 
1 .. -I ... - J ... 1 „ --j ... 1 ... 1 — 1 ... -1 

1 - 1 - 1 - 1 - 1 - 1 - 1-1 -1 
i -1 ... -1 ... -i ... -1 ... -1 ... 1 .„ 1 ... -1 

1 - 1 - 1 - 1 - 1 - 1-1 - 1-1 
1 - 1 - 1-1 - 1-1 - 1 - 1-1 
1 - 1 - 1 - 1-1 -1 -1 - 1-1 
1 - 1 - 1 - 1 - 1 - 1 - 1 - 1-1 
1-1 -1 - 1-1 - 1-1 - 1-1 
1-1 -1 -1 -- 1 - 1 - 1 - 1--1 
1 - 1 - 1 - 1 - 1 - 1-1 - 1-1 
1-1 - 1 - 1-1 - l - l - l - l-l 
1-1 - 1 - 1-1 - 1 - 1-1 - 1-1 
1 - 1 — 1 - 1 - 1 — 1 - 1 —^- 1-1 
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" 1 - *1 - 1 -1 -1 ” 1 -1 -1 -- 1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 
- 1 ~ 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 
- 1 - 1 - 1 - 1 - 1 “ 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 ~ 1 -1 -1 - 1 
~ 1 - 1 - 1 ~ 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 ™ 1 - 1 - 1-1 
FIM 


0 que aconteceu aqui? Quando C e -1, o programa mostra duas vezes mais linhas do que 
quando C=5. Usa-se uma posigao extra na tela para mostrar o sinal de menos. 

Numeros de multiplos dfgitos (incluindo negativos) vao estourar a capacidade da tela, a 
menos que o loop FOR-NEXT seja ajustado. Se o C for trocado por 2001, um campo de quatro 
dfgitos sera requerido, de forma que devemos ajustar o fndice de 800 para 800/4=200: 


> 200 02001 
>210 FOR 1=1 TO 200 
>220 PRINT C5 
>230 NEXT I 
>240 PRINT "FIM" 

>250 END 
> R U N 

2001200120012001200120012001200120012001 
2001200120012001200120012001200120012001 
2001200120012001200120012001200120012001 
200120012001200120012001200120012001 2001 
200120 0120 0120012 00120012001200120012001 
2001200120012001200120012001200120012001 
2 001200120 0120012 001200120 0120012001 2001 
2001200120012001200120012001200120012001 
2001200120012001200120012 001200120012001 
2001200120012001200120012001200120012001 
2 001200120012001200120012 001200120012 001 
2001200120012001200120012001200120012001 
2 0012001200120012 00120012001200120012001 
2001200120012001200120012001200120012001 
2001200120012001200120012001200120012001 
2001200120012001200120012001200120012001 
2001200120012001200120012001200120012001 
2001200120012001200120012001200120012001 
2001200120012001200120012001200120012001 
2001200120012001200120012001200120012001 
FIM 


Os numeros sao cortados no fim da linha, se necessario. Isso e porque o ponto-e*vfrgula (;) 
sera contfnua apresentagao, e nada al6m do fim de linha pode causar um retorno. Tente o exemplo 
acima com C igual a 201 para ver isso. 
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Usando Vi'rgulas 

0 aparecimento de vi'rgulas entre variaveis ou no fim de uma declaragao PRINT trata os dados 
mostrados como se eles estivessem tabelados em intervalos especfficos. As regras de tabulagao sao 
diferentes no Integer BASIC e no Applesoft. 

0 Integer BASIC tern cinco paradas de tabulagao na tela. Sao as colunas 1, 9, 17, 25 e 33; 
existem 8 espagos entre cada uma. Aqui est3 um exemplo: 


>NEU 


> 200 

f >1 23 




> 210 

FOR 1 = 

1 TO 100 



> 220 

PRINT 

C > 



> 230 

NEXT I 




> 240 

PRINT 

"FIM" 



> 250 

END 




••RUN 





123 

123 

123 

1 23 

123 

123 

123 

1 23 

1 23 

123 

123 

123 

1 23 

123 

123 

123 

123 

123 

123 

123 

123 

123 

1 23 

123 

123 

123 

123 

123 

123 

123 

123 

123 

1 23 

1 23 

123 

123 

1 23 

123 

123 

123 

123 

123 

123 

1 23 

123 

123 

1 23 

123 

123 

123 

123 

123 

12.3 

123 

1 23 

••{ 2 3 

123 

123 

123 

12 3 

123 

123 

123 

123 

123 

123 

1 23 

123 

123 

123 


123 

123 

123 

•1 oo 

1 23 

1 23 

123 

123 

123 

•1 23 

1 23 

123 

123 

123 

123 

123 

1 23 

•1 oo 

123 

123 

123 

123 

123 

123 

•123 

123 

123 

123 

123 


Deve haver pelo menos um espago em branco a frente da posigao de tabulagao (§ excegao 
da primeira) ou a posigao de tabulagao ficara inativa. Assim, nao deve haver nada colocado na 
coluna 8 para que a segunda posigao de tabulagao seja ativa, e assim por diante. O programa 
seguinte ilustra isso com cordoes de texto: 
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>10 REM C) EVE-BE DIMENSIONS AS VAR IA VE IS CORDAO 
>20 DIM C*<8> 

>200 C%" 12345678" 

>210 FOR 1*1 TO 20 
>220 PRINT C$, 

>230 NEXT I 
>240 PRINT "FIM" 

>250 END 
> R UN 

12345678 12345678 12345678 

12345678 12345678 

12345678 12345678 12345678 

12345678 12345678 

12345678 12345678 12345678 

12345678 12345678 

12345678 12345678 12345678 

12345678 12345678 

FIM 

Se trocarmos o C$ por "1234567", todas as cinco posigdes de tabulagao serao usadas. 

Existem algumas condigoes especiais que governam a tabulagao com vi'rgula no Applesoft, 
como mostrado na Figura 4.1. 


13 Posigao de Tabulagao 
> Infcio na coluna 1 


- largura de 16 espagos - 


23 Posigao de Tabulagao 

• S<5 existe se nao existir nada 
colocado na coluna 16 

• Infcio na coluna 17 



3? Posigao de Tabulagao 

• S6 existe se nao existir nada 
colocado nas colunas 24-32 

• Infcio na coluna 33 


run 1111 ii 

largura de 16 espagos —4- *| r 9 ura de 
» 8 espagos 


FIGURA 4.1. Paradas de Tabulagao do PRINT no Applesoft. 


Para ver como as vfrgulas funcionam no Applesoft, usando nosso programa de exemplo, 
troque 0 ponto-e-vfrgula da declaragao PRINT por vi'rgula. Isso causa a colocagao dos numeros em 
tres colunas. Com tres numeros por linha, o fndice do loop FOR-NEXT sera 3*20=60. 0 progra¬ 
ma completo e mostrado a seguir. 

1200 C * 2001 
1210 FOR I * 1 TO 60 
1220 PRINT C r 
1230 NEXT I 
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3240 

3250 

RUN 

PRINT 

END 

"FIN" 


2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 


2001 

2001 

2001 

FIM 


2001 

2001 


As vi'rgulas tambem funcionam com cordoes. Como exemplo, coloque o seguinte programa 
para mostrar vinte linhas de caracteres alinhados: 


3 NEW 

3100 A$-"TERRA" 
3110 0$="AGUA" 
3120 0$="VIDA" 
3210 FOR 1=1 TO 

20 


3220 PRINT A*?BS 
3230 NEXT I 

3240 PRINT "FIN" 
3250 END 

3 RUN 

r C* 


TERRA 

AGUA 

DID A 

TERRA 

AGUA 

VIDA 

TERRA 

AGUA 

UI DA 

TERRA 

AGUA 

UIDA 

TERRA 

AGUA 

VIDA 

TERRA 

AGUA 

VIDA 

TERRA 

AGUA 

VIDA 
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TERRA 

AGUA 

VIDA 

TERRA 

AGUA 

VIDA 

TERRA 

AGUA 

VIDA 

TERRA 

AGUA 

VIDA 

TERRA 

AGUA 

VIDA 

TERRA 

AGUA 

VIDA 

TERRA 

AGUA 

V IDA 

TERRA 

AGUA 

VIDA 

TERRA 

AGUA 

VIDA 

TERRA 

AGUA 

VIDA 

TERRA 

AGUA 

VIDA 

TERRA 

AGUA 

VIDA 

TERRA 

FIM 

AGUA 

VIDA 


Como exercfcio, tente colocar B$ como ATRIBUTOS no lugar de AGUA. Se for visto na 
Figura 4.1, nao havera surpresa ao se ver que a terceira posigao de tabulagao nao sera usada. A 
palavra ATRIBUTOS, iniciando na segunda posigao de tabulagao na coluna 17, mostra dados nas 
colunas de 24 ate 32. Colocando qualquer coisa nas colunas 24 a 32 desativa a terceira posigao de 
tabulagao. 


funqOes de formataqAo de impressao 

Usa-se a palavra formataqao para descrever o processo de arranjar a informagao na tela de vfdeo 
de forma que ela seja mais facil de ser lida e entendida, e mais agradavel para a vista. Como se viu, 
os sinais de vfrgula e ponto-e-vi'rgula ajudam. A formatagao pode ainda ser uma tarefa desafiante. 
Por exemplo, suponha que se quer mostrar um cabegalho no meio da primeira linha no alto da tela. 

Aqui esta um programa em Integer BASIC que usa vfrgulas para tabular no centro da tela e 
imprimir o cabegalho. Tambem e usada a declaragao CALL, recentemente estudada, para posi- 
cionar o cursor no canto esquerdo do alto da tela (veja Apendice D). 

>NEW 

>5 REM DEVE-SE DIMENSIONS CORDOES 
>10 DIM HD$(30) 

>500 REM LIMPAR A TELA E 

>510 REM MOVER 0 CURSOR PARA 

>520 REM 0 CANTO SUPERIOR ESQUERDO 

>530 CALL -936 

>540 H D % = :: " R E L. A T 0 R 1 0 " 

>550 REM TABULA NO CENTRO DA TELA 
>555 REM E IMPRIME 0 CABEGALHO 
>560 PRINT HD* 

>570 END 
>RUN 


RELATOR 10 
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0 cabepalho ficou aproximadamente centrado na tela. Se ele for mais extenso, por exemplo 
RELATORIO PARCIAL DE AGOSTO, poderia nao ficar centrado. (Tente.) Este novo cabepalho 
sera aproximadamente centrado quando se remover uma das vi'rgulas e cordao nulo correspon- 
dente, de forma que o cordao e colocado a partir da segunda posipao de tabulapao no lugar da 
terceira. 

Pode-se usar a mesma tecnica para mostrar cabepalhos no Applesoft. Porem o Applesoft tern 
recursos de formatapao da declarapao PRINT mais faceis de usar: as funcoes SPC, TAB e POS. 


A Funpao SPC 

A funpao SPC salta espacos. Inclui-se o SPC como urn dos termos da declarapao PRINT; apos as 
letras SPC deve-se incluir (entre parenteses) o numero de posipoes que se deseja pular. Por exem¬ 
plo, pode-se centralizar o cabepalho RELATORIO com o seguinte: 

3100 REM LIMP A A TELA 
1110 HOME 

3120 REM PULA ESPACOS E DA MENS AGE M 
31 3 0 P R IN T S P C < 15 > " R E L A T 0 R10 " 

3140 END 
3 RUN 


RELATORIO 

Veja o ponto-e-vfrgula apos o SPC. Uma vi'rgula faria iniciar a apresentapao do texto na proxima 
posipao de tabulapao seguinte ao numero de espapos especificados pelo SPC. 

Sempre que se inclui a funpao SPC numa declarapao PRINT, simplesmente faz-se com que o 
proximo caractere a ser colocado no vfdeo aparepa deslocado do numero de posipoes especificado 
pelo SPC, em relapao ao local em que originariamente apareceria; nada mais acontece. 


A Funpao TAB 

A funpao TAB opera de forma muito semelhante ao que acontece com a tabulapao de uma ma- 
quina de escrever. 



FIGURA 4.2. Determinando a Posipao de Caracteres na Tela. 
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Suponha que se deseja colocar dados em colunas. Deve-se, em primeiro lugar, calcular a 
posigao em que cada numero deve comegar. Um formulSrio como o mostrado no Apendice L e util 
para esse proposito. Na Figura 4.2, as colunas iniciam nas posigoes 1, 15 e 31. Agora, ao inv6s 
de se usar espagos em branco como se faz para ir de coluna a coluna, usa-se a fungao TAB apos 
cada entrada na declaragao PRINT. 

Considere a linha mostrada na Figura 4.2. Contando posigoes de caracteres, poderfamos 
apresentar a linha sem paradas de tabulagao, como segue: 

".110 ?"PEDROSO , J . h 431 -25-6277 1 420 - 00" 

Ao inves de se colocar espagos em branco, pode-se usar a fungao SPC e diminuir a declaragao, 
como aqui: 

:j 1 0 ? " PEDR 080 y ,J - M ? 8PC < 7 ) : " 431 -25- 6 277 " 5 SP 
0(5)""1420 - 00" 

Mas tabular e mais fScil porque se tabula para um numero de coluna conhecido ao inves de contar 
espagos: 

1 1 0 ? " PEDR 0S0 •/ J * M " 7 T AB < 1 6 > 5 " 431 -25-6277 " 5 T 
AB(32)7"1420.00" 


Determinando a Posigao do Cursor (Horizontal) 

POS e a ultima das fungoes de formatagao do Applesoft. Ela mostra em que posigao o cursor se 
encontra. Essa posigao e expressa como um numero, que e o numero da coluna em que o cursor 
se encontra piscando. Sempre se inclui o argumento inutil (0) depois do POS, como segue: POS(O). 
0 seguinte comando demonstra a capacidade do POS: 

:j?~POSIGAO DO CURSOR «"?P0S<0> 

Execute este comando de modo imediato. Na tela aparecera o seguinte: 

l?"POSICAO DO CURSOR ^"5P0S(0> 

POSIGAO DO CURSOR «19 

0 cursor estava na posigao 19 apos colocar POSIQAO DO CURSOR =. Se forem colocados alguns 
espagos apos o "=", e antes do fechamento das aspas, troca-se o numero 19 por algum numero 
mais alto. 

No Integer BASIC pode-se simular o POS(O) com um PEEK(36) para determinar em que 
coluna o cursor se encontra. Aqui esta o exemplo anterior reformulado: 

>PRINT "POSIGAO DO CURSOR *~?PEEKf36> 

POSIGAO DO CURSOR *19 

Note que as colunas da tela sao numeradas de 0 a 39 para POS, PEEK(36) e SPC. Elas sao nume- 
radas de 0 a 40 para a fungao PRINT TAB e para outras duas instrugoes que veremos mais tarde, 
HTAB e TAB (Integer BASIC). 
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Determinando a Posipao do Cursor (Vertical) 

Um PEEK(37) da a posipao da linha em que o cursor se encontra. 

As linhas sao numeradas de 0 a 23 para o PEEK(37), mas de 1 a 24 para o VTAB (visto na 
proxima sepao). 


CONTROLE DE CURSOR E EFEITOS ESPECIAIS DE VfDEO 

Existem algumas declarapoes em BASIC que aumentam a versatilidade do vfdeo do Apple II. Sao 
elas as declarapoes FLASH, INVERSE, SPEED, NORMAL, HOME, VTAB e HTAB/TAB. A maior 
parte destas estao dispom'veis apenas no Applesoft. Existem tamb6m algumas fungoes graficas; 
sao estudadas no Capftulo 6. 


Posicionando o Cursor 

Jci vimos varias formas de controlar o cursor atraves do uso de vfrgula e ponto-e-vi'rgula com a 
declaragao PRINT. As fungoes de formatagao SPC, TAB e POS do Applesoft tambem sao uteis 
para posicionar o cursor. 


Limpando a Tela do Vfdeo 

Pode-se limpar a tela e posicionar o cursor no alto a esquerda com a declaragao CALL-936, ou 
com a declaragao HOME no Applesoft. Tente digitd-los (um para o Integer BASIC, o outro para 
o Applesoft): 


>CALL. -936 
THOME 

Posicionamento Horizontal e Vertical 

Existem duas declarapoes que em conjunto permitem mover o cursor para qualquer posipao na 
tela. VTAB move o cursor verticalmente e HTAB (TAB no Integer BASIC) move o cursor hori- 
zontalmente. Deve-se especificar o numero da linha para VTAB e o numero da coluna para HTAB. 
A linha mais alta da tela e 1 e a mais baixa 24. A coluna mais a esquerda e a de numero 1 e a mais 
a direita e a 40. 

O programa seguinte usa estas duas declarapoes (no Applesoft) para posicionar o cursor em 
mostrar um asterisco naquela posipao. No caso do Integer BASIC use TAB ao inves do HTAB nas 
linhas 90 e 120. 

90 HTAB isVTAB < 1) 

100 INPUT "LINHA?" 7 L. 

110 INPUT "COLUNA?""C 
120 VTAB L..s HTAB C 
130 PRINT 
140 GOTO 90 
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As Declares INVERSE e NORMAL 

Pode-se inverter as partes branca e preta do caractere na tela; a declaragao faz isso. Uma vez que a 
declarapao 6 executada, tudo que for colocado na tela pelo PRINT aparece no modo vfdeo reverso. 
Os caracteres que sao digitados no teclado, no entanto, sao passados para o vfdeo em modo nor¬ 
mal. 

0 Apple II retorna ao modo normal quando for executado o comando NORMAL. 

Para ver como estes dois comandos operam, tente isso (os caracteres sombreados sao em 
vfdeo reverso): 

:j inverse: 

3?"PRETC NO BRANCO" 

PRETO NO BRANCO 
3NORMAL 

3?"BRANCO NO PRETO" 

BRANCO NO PRETO 

0 INVERSO e o NORMAL nao sao aceitos pelo Integer BASIC. 

A Declarapao FLASH 

Alem de se poder reverter as partes branca e preta do caractere, pode-se ainda fazer com que ele 
fique piscando entre os modos normal e inverso. Use a declaragao FLASH para isso. De novo, o 
NORMAL faz o Apple II retornar ao modo normal. 

Aqui esta um exemplo (a area sombreada fica piscando): 

1FLASH 

3 ?"C AR ACT E RES PISCANDO" 

CARACTERES PISCAND0 
3NORMAL 

3 ? " C A R A C T E R E S N 0 R M AIS " 

CARACTERES NORMAIS 

O FLASH nao e permitido no Integer BASIC. 

A Declarapao SPEED 

A velocidade com que os caracteres sao mostrados no vfdeo e variavel. Pode-se diminuf-la da sua 
velocidade normal atraves da declarapao SPEED. 

0 programa seguinte ilustra como o SPEED funciona: 


3100 

INPUT 

"VELOCIDADE: 

3110 

SPEED 

* ML 

3120 

FOR CI¬ 

- 1 TO 3 

3130 

RRI NI¬ 

"MEL" 

31 40 

NE XT 


3 ISO 

PRINT 

"FIMMEL" 

31 60 

SPEED 

- 2S5 

3170 

END 
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0 valor da expressao (isto e, o valor de VL na linha 110) ajusta a velocidade de impressao; 
0 e a menor e 255 e a maior. 0 SPEED tambem afeta a velocidade com que os caracteres sao man- 
dados para outros dispositivos, nao apenas para a tela. 

0 SPEED nao e permitido no Integer BASIC. 

JANELAS DE TEXTO 

Normalmente, o Apple II utiliza todas as 24 linhas e 40 colunas da tela no modo texto. Usando a 
declaragao POKE, pode-se alterar o tamanho e a posigao dessa janela de texto. Quatro posigoes de 
memoria controlam o tamanho, a forma e a posigao da janela de texto, como mostrado na Ta- 
bela 4.1. 


TABELA 4.1. Posigoes de Memoria da Janela de Texto. 


Posigao de Memoria 

Controle 

Faixa Permitida 

32 

Margem Esquerda 

0 a 39 

33 

Largura 

1 a 40 menos Margem Esquerda 

34 

Linha de Cima 

0 ate Linha de Baixo 

35 

Linha de Baixo 

Linha de Cima menos 24 


Deve-se ter cuidado em observar o bom senso nos limites de faixa descritos na Tabela 4.1, 
quando se determina a janela de texto. Tentar determinar janelas fora desses limites dara resultados 
imprevisi'veis. 

0 exemplo de programa abaixo ser3 uma janela de texto de duas linhas no meio da tela para 
entrar um valor numerico. Para apreciar toda a utilidade da tecnica, tente entrar algum valor nao 
numerico e observe o que acontece com a mensagem de erro. Note tambem que em se determi- 
nando a janela de texto, nao se apaga o resto da tela, nem se move o cursor para dentro da janela. 
Deve-se dar instrugoes especiais dentro do BASIC para fazer essas tarefas. 

1000 PEli DETERMINA LINHA DE CIMA DA 

•JANELA/MARGEM ESQUERDA E LINHA DE BAIX0 
•101 0 T« 10 s W = 2 0: L M = :: 11 s B ^ 13 
1020 REM LIMPA A TELA 
1020 CALL -926 

•1040 REM DETERMINA A JANELA DE TEXTO 

PARA ENTRADA 
1050 GOSIJB 3200 

1060 REM LI MIT A A JANELA DE TEXTO COM 

ASTER I SCOS 
1070 COSUB 3000 
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1080 REM MOVE CURSOR PARA DENTRO DA 
JANELA ? ENTRA 
1090 VTAB T+2 
1100 INPUT Ml 

1110 REM ELIMINA JANELA - VIDEO INTEIRO 
1120 GOSUB 3300 

1130 REM MOVE CURSOR.LINHA DE BAIXO 
1140 VTAB 23 
1150 END 

2990 REM LIMITANDO A JANELA COM 

ASTERISCOS 

3000 VTAB T+1 

3010 oosue 3100 

3020 VTAB B+1 

3030 G0SUB 3100 

3040 RETURN 

3090 REM C0L.0CA ASTERISCOS 
3100 FOR 1=1 TO U 
3110 PRINT ; 

3120 NEXT I ; 

3130 RETURN 

3190 REM CRIA JANELA DE TEXTO 

3200 POKE 32, T 

3210 POKE 33,U 

3220 POKE 34,LM 

3230 POKE 35,B 

3240 RETURN 

3290 REM GERA JANELA INTEIRA 

3300 POKE 32,0 

3310 POKE 33,40 

3320 POKE 34,0 

3330 POKE 35,24 

3340 RETURN 


A FUNQAO CHR$: PROGRAMANDO CARACTERES EM ASCII 

No capftulo anterior vimos como se pcde gerar caracteres invisfveis como o Ctrl-G, que d£ o 
bip. Por6m existem certos caracteres (tanto visfveis quanto invisfveis) que nao podem ser digita- 
dos diretamente pelo teclado, incluindo "]" e Pode-se gerar estes caracteres no Applesoft 
com a funpao CHR$. 

Para entender como a funpao CHR$ opera, deve-se entender como o Apple II guarda os 
caracteres na memoria. Na verdade 6 bem simples. A memoria do computador pode armazenar 
numeros, mas nao caracteres. Os caracteres devem ser convertidos para codigos numericos. 0 
Apple II usa o mesmo codigo que todos os outros microcomputadores, o ASCII (American Stan- 
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dard Code for Information Interchange). Por exemplo, o codigo ASCII para a letra A 6 65, para 
B e 66, C e 67 e etc. Existe uma tabela completa do codigo ASCII no Apendice I. Sempre que o 
Apple II estiver operando com cordao, ele interpreta valores numericos como codigos ASCII para 
caracteres. 

No Applesoft, se nao e possfvel acionar uma tecla para incluir um caractere dentro de um 
cordao de texto, pode-se ainda selecionar o caractere usando seu codigo ASCII. 

A fungao CHR$ traduz o codigo numerico em ASCII no caractere equivalente. Por exemplo, 
para criar o si'mbolo "$", primeiro ache o seu codigo ASCII no Apendice I. Daf use o codigo com 
CHR$ como segue: 

DPR I NT CHR$<36) 

% 

Experimente em modo imediato usando qualquer codigo ASCII entre 0 e 255. 

Pode-se usar a fungao CHR$ em conjunto com cordoes regulares na declaragao PRINT, 
como segue: 

D ?CHR* < 34)5"ASP AS!"?CHR$<34) 

"ASPAS!" 

A fungao CHR$ permite incluir caracteres que de outra forma nao seriam permitidos, tal 
como retorno e aspas, como parte do cordao de texto. 


PROGRAMANDO ENTRADA DE DADOS 

0 objetivo de qualquer programa e minimizar erros na entrada de dados e tornar facil para o ope- 
rador o ato de corrigir erros, caso ocorrerem. Existem formas de organizar os dados de entrada de 
forma a minimizar a ocorrencia de erros. 

Primeiro, entre todos os dados de um bloco e depois processe-os. Nao e uma boa pratica 
processar cada dado assim que ele e digitado pelo teclado. 

Um programa de mala direta, por exemplo, requer nomes e enderegos a serem digitados co¬ 
mo dados. E interessante que o bloco nome-e-enderego seja tratado como um unico bloco de 
dados. Em outras palavras, o programa deve pedir nome e enderego, permitindo ao operador entrar 
toda a informagao, e ainda poder altera-la. Quando o operador tiver certeza que nome e enderego 
estao corretos, o programa podera seguir adiante e processar essa informagao. Apos isso devera 
parar e esperar por outro nome e enderego. 

No caso do programa de mala direta seria uma pratica ruim pedir o nome, processa-lo imedia- 
tamente, pedir cada linha de enderego, tratar cada pedago do nome e do enderego como unidades 
separadas com fungoes distintas. 

E sempre uma boa ideia organizar a entrada de dados de forma que eles permanegam no 
vfdeo por algum tempo apos as suas digitagoes. Isso faz com que seja dado oportunidade ao ope¬ 
rador para reparar erros e corrigi-los. Se os dados entrados desaparecem tao logo sao entrados, nao 
ha oportunidade para que o operador reveja a digitagSo e ocasionalmente detecte um erro. Natural- 
mente o operador deve ter alguma forma de corrigir digitagoes previas. 

Em alguns casos, nao e bom deixar o operador digitar os dados em blocos funcionais e ter 
possibilidade de corrigir erros. 0 numero de vezes em que isso acontece e bem grande. Ocorre 
quando um grande volume de dados deve ser digitado pelo operador. Por exemplo, suponha que 
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um operador de teclado deva digitar centenas de nomes e enderegos durante o dia. A experiencia 
tem mostrado que um volume de digitagao mais correto e obtido quando o operador ignora os 
erros de digitagao na primeira vez que digita. 0 programa de entrada de dados neste caso nao per- 
mite que sejam feitas correpoes na primeira digitagao, mesmo que o operador perceba o engano. 
0 digitador deve ignorar o erro e seguir adiante colocando os dados o mais rapidamente possfvel. 
Sob este esquema, os dados sao digitados duas vezes, de preferencia por operadores diferentes. 
As chances de que os dois operadores cometam o mesmo erro e tao pequena que se pode contar 
todos os erros achados com as diferengas entre as duas digitapoes. Um programa subsequente 
permite a reentrada dos dados colocados incorretamente. 


Entrada de Dados Interativa 

Um programa com entrada de dados interativa guia o operador com mensagens e indicapoes no 
vfdeo. Para demonstrar a entrada de dados interativa vamos colocar um exemplo bem simples. 
Faremos uma modificapao num programa ja visto neste capi'tulo de forma que ele usara o processo 
interativo de entrada de dados, tornando assim o programa mais facil de usar. 

Aqui esta o programa: 


200 

c$ - ~ur 

210 

FOR I « 

220 

PRINT C$ 

230 

NEXT I 

240 

PRINT "F 

250 

END 


Como foi mostrado, o programa coloca 800 caracteres W seguidos da palavra FIM. Ele opera 
da mesma forma tanto em Integer BASIC quanto em Applesoft. 

Suponha que desejamos trocar o W por qualquer caractere. 

Primeiro eliminamos a declarapao de determinagao do programa. Lembre-se de que para 
eliminar uma declarapao do programa, digita-se o numero da linha seguido pela tecla RETURN. 

210 FOR T. « 1 TO 800 

220 PRINT C* 

230 NEXT I 
240 PRINT "FIH" 

250 END 

A linha 200 nao esta mais no programa. 

Digite C$="X" em modo imediato, e execute oprograma. 

3 RUN 
FIM 

A palavra FIM foi colocada mas os X's nao. Claramente o valor de C$ nao foi transferido 
para o programa. 

0 comando RUN coloca todas as variaveis numericas em 0 e todos os cordoes em nulo antes 
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de iniciar a execugao do programa. Entao o C$ foi colocado em nulo, e o loop mostrou no vi'deo o 
caractere nulo (um nulo e "nada", nao transfere o caractere para o vi'deo nem move o cursor). 

Existe uma forma de transmitir um valor diferente de C$ a cada vez que se roda o programa? 
Ao inv6s do RUN que limpa as variaveis, use GOTO 210 (sendo 210 a primeira linha do programa). 
Isso nao modifica nenhuma variavel. 

3C$="X" 


3GOTO 210 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxx^xxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

FIM! 

Existem apenas dois passos para rodar o programa, mas o processo e desajeitado. Deve-se 
digitar a linha (a declaragao de atribuigao), e se for digitado RUN ao inves de GOTO, tudo deve 
ser reiniciado. Porem, o programa poderia obter o caractere durante sua execugao, usando a decla¬ 
ragao INPUT. 

Digite a linha seguinte: 

3200 INPUT C$ 

Agora liste o programa para se certificar que tudo foi digitado corretamente: 


U.IS 

T 


200 

INPUT 

C» 

210 

FOR I 

r, i 

220 

PRINT 

C* 

230 

NEXT I 


2 A0 

PRINT 

"FI 

250 

END 



Rode o programa. 0 cursor desce uma linha. (No Applesoft aparece um ponto de interro- 
gagao a frente do cursor tambem.) Digite qualquer caractere unitario (e acione RETURN). 0 
caractere entrado e mostrado 800 vezes. Rode o programa novamente. Entre um caractere dife¬ 
rente. O mesmo acontece com o outro caractere. Veja que se for tentado colocar mais de um 
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caractere por vez no Integer BASIC, o programa para com a mensagem *** STR OVFL ERR. 
Isso e porque o C$ nao foi dimensionado. 

Essa e uma melhoria significativa sobre o programa original. Entretanto atrapalha um pouco 
ter o cursor piscando na tela enquanto se espera uma digitapao pelo teclado. Adicione uma linha 
no infcio do programa, pedindo a digitapao de um caractere. Digite esta linha: 

1190 PRINT "DIGITE UM CARACTERE" 

Liste o programa e verifique se a linha foi digitada sem erros. 

Agora o programa da instrupoes ao operador. Rode-o varias vezes para mostrar caracteres 
diferentes e veja como a operapao ficou muito mais f£cil. 

Existe uma importante alterapao por fazer. Se for desejado que se repita varias vezes a 
execupao do programa, use a declaracao GOTO para voltar ao infcio do programa em vez de fina- 
lizar. Assim nao e mais necessario redigitar RUN a cada vez que se deseje nova passagem. Coloque 
a linha abaixo: 

1250 GOTO 190 

Agora ficou ainda mais facil de operar. Entre o RUN e siga as instrupoes. 

Claramente, deve-se usar agora o CTRL-C para parar o programa. Isso pode ser eliminado 
programando-se uma tecla especial para parar a execupao. Por exemplo, a tecla RETURN poderia 
ser programada para tal fim. Aqui esta como: 


190 

PRINT 

"ENT 

RE UM CARACT 

ERE 

200 

INPUT 

C$ 



205 

IF C* 

•' " 

THEN END 


210 

FOR I 

« 1 

TO 800 


220 

PR INI- 

c$ 



230 

NEXT 

I 



240 

PRINT 

"FIM 

" 


250 

GOTO 

190 




A linha 205 verifica se C$ tern valor nulo. Isso acontecera quando nada for digitado em res- 
posta a declarapao INPUT da linha 200, sendo apenas acionada a tecla RETURN. 

Como tarefa final, releia o programa e adicione comentclrios. Inclua uma observapao no 
fndice 800 do FOR-NEXT; pode-se opcionalmente colocar o comentario na mesma linha, usando 
os dois pontos para separar as declarapoes: 

210 F 0 R I = 1 T 0 800 5 R E M 800/ 4 0 2 0 

Informe que uma entrada nula termina o programa: 

203 REM FIM DE PROGRAMA COM ENTRADA NULA 

Finalmente, adicione algumas linhas de comentario no infcio para descrever o programa, e Ihe de 
um nome. O formato final e mostrado na Figura 4.3. 
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10 REM ******* REPETECO ******* 

20 REM MOSTRA CONTINUAMENTE 
30 REM 0 CARACTERE 
40 REM DIGITADO NO TECLADO 
50 REM ********************** 

190 PRINT "DIGITE UM CARACTERE" 

200 INPUT C$ 

203 REM FIM DE PROGRAMA COM NULO 
205 IF C$ = " " THEN END 
210 FOR I = 1 TO 800: REM 800/40 = 20 
220 PRINT C$ 

230 NEXT I 
240 PRINT "FIM" 

250 GOTO 190 


FIGURA 4.3. Programa REPETECO. 


Mensagens de Orientacao 

Qualquer programa que requeira dados deve orientar o operador fazendo perguntas. Essas per- 
guntas sao geralmente apresentadas numa so linha e pedem respostas simples, como "sim" ou 
"nao". Por exemplo, a seguinte mensagem pode aparecer: 

VAI FAZER ALGUMA ALTERAQAO? 

Um operador deve responder a essa mensagem com a palavra SIM ou com a palavra NAO. 
Em geral, as letras S ou N sao suficientes. Um outro exemplo como este e o que da ao operador um 
leque de opcoes. A mensagem: 

QUE ITEM DEVE SER ALTERADO? 

pode permitir que o operador digite o codigo que identifica a entrada desejada. 

Os programas que controlam este tipo de dialogo devem ser escritos como sub-rotinas inde- 
pendentes que nao assumem nada, nem dependem de conhecimento do programa que as esta 
chamando. Isso tern tres aplicacoes: 

1. Nao se pode considerar que o local em que a mensagem sera impressa esteja em branco. 
Se nao estiver, a mensagem sera colocada em cima da anterior. Porem se existirem carac- 
teres nao cobertos pela mensagem, eles ficarao 14. Isso pode atrapalhar o operador e leva- 
lo a erro. A sub-rotina seguinte limpa o numero de espapos determinado pelo valor da 
variavel ER: 


5000 REM LIMPA ESPACOS 

5 010 F 0 R l -1 T 0 E R s P R IN ■(■ " S N E X T I: R E T U R N 
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2. Uma sub-rotina deve receber informaqao do programa que a chamou. Por exemplo, se a 
sub-rotina pede ao operador um numero, entao todo programa que a utilize deve especi- 
ficar os valores maximo e rm'nimo aceitaveis na digitacao. 

3. A sub-rotina deve devolver a resposta do operador ao programa origem. Pode ser um 
caractere (como S ou N), uma palavra (como SIM ou NAO) ou um numero. 

A logica da sub-rotina nao consegue deduzir em que parte da tela a mensagem aparecera. 0 
mais simples, no caso, e que o programa origem posicione o cursor antes de chamar a sub-rotina. 

Veja agora a sub-rotina necess^ria para fazer uma pergunta que retorna um S para SIM e um 
N para NAO. Usaremos a declaraqao PRINT para fazer a pergunta, seguida de INPUT para receber 
a resposta de um caractere. Limparemos parte da tela com a sub-rotina acima. Aqui esta o progra¬ 
ma e as sub-rotinas: 

100 REM MOVE 0 CURSOR 
140 VTAB 1 

150 REM CMAMA SUBROT INA PARA PEDIR RESPOSTA 
160 GOSUB 3020 
170 END 

3000 REM ++ PEGA A RESPOSTA S/N ++ 

3010 REM 

3020 C”»P0S (0): R EM GUAR DA CO LUNA DO CURSOR 
3030 R-PEEK(37)5 REM GUARDA LINHA DO CURSOR 
3040 REM LIMPA ESPACOS PARA A PERGUNTA 
3050 ER=35:REM LIMPA 35 ESPACOS 
3060 GOSUB 5010 

3070 HTAB C + lsREM REPOS ICAO DO CURSOR 
3080 PRINT ~QUER EAZER ALGUMA ALTERACAO" 

3090 INPUT R$ 

3100 IF R % = :: "S" OR R$=:"N" THEN RETURN 
3110 REM RESPOSTA IMPROPRIA 
3120 VTAB R+lsREM REPOSICIONA CURSOR 
3130 GOTO 3050 s REM TENTA NOVAMENTE 
5000 REM ++ LIMPA ESPACOS ++ 

5 010 F 0 R I = 1 T 0 E R = P RIN 7.5 N E X T X s R E T U R N 

Veja agora o dialogo que permite ao operador a entrada de um numero. Vamos criar uma 
sub-rotina que aceita resposta nao menor que o valor da variavel Ml e nao maior que a variavel MA. 
Aqui esta o programa necessario: 

100 REM DA LIMITES E POSICAO DO CURSOR 
140 MI =1 5 MA="10 
150 VTAB 1 

160 REM CHAMA SUBROTINA PARA RESPOSTA 
170 GOSUB 3500 
180 END 

3500 REM ++ PEGA RESPOSTA NUMERICA ++ 
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3510 REM ++ MI<RESPOSTA < M A + + 

3520 REM ++ MM E A RESPOSTA ++ 

3530 GOSUB 5110s REM ONDE ESIA 0 CURSOR 
3540 REM LI MPA ESP AGO PAR. A PERGUNTA 
3550 ER r:: 35s REM LIMPA 35 ESPACOS 
3560 GOSUB 5010 

3570 HTAB C+lsREM REP OS I Cl. ON A CURSOR 
3580 PRINT "QUE CAMPO DEVE SER MUDADO ?"5 
3590 INPUT NH 

3600 IF NM>MI AND NM<MA THEN RETURN 
3610 REM RESPOSTA IMPROPRIA 
3620 VTAB L+1s REM REPOSICIONA CURSOR 
3630 GOTO 3550r, REM TENT A DE NOVO 
5000 REM ++ LIMPA ESPACOS ++ 

5010 FOR I«1 TO ERsiPRINT.* NEXT Is RETURN 

5100 REM ++GUARDA POS.ATUAL DO CURSOR ++ 
5110 C« PEEK<36):REM COLUNA 
5120 L* PEEK(37):REM LINHA 
5130 RETURN 


Pode-se modificar a sub-rotina de forma que ela aceite entradas de dois caracteres? Tente 
modificar o programa por sua conta para fazer isso, entao espere irmos um pouco mais adiante 
neste capi'tulo, onde se encontra a sub-rotina necessaria no programa que controla entrada de 
dados. 

Existe outra modificagao simples em ambos os dialogos que mostramos. As mensagens de 
orientagao podem ser fornecidas pelo programa que chamou a sub-rotina. Isso a torna de aplicagao 
muito mais generica. Tente fazer essas alteragoes no programa. 


Detecgao de Erros e Controle 

Se for desejado fazer um programa de boa qualidade deve-se realizar um grande esforgo para prever 
a possibilidade de ocorrencia de erros que o usuario do programa possa fazer. 0 programa deve 
achar erros e forgar o operador a redigitar os valores que fariam o computador operar de forma 
anormal (estourar, na linguagem "computes"). 

E verdade que o Apple II acha alguns tipos de erros para nos. Ele nao aceita entrada alfabe- 
tica quando espera dados numericos numa declaragao do tipo INPUT A. Se for tentado colocar 
letras neste caso, e dada uma mensagem de erro e se pede para redigitar o valor. 

A capacidade de detecgao de erros embutida no sistema e limitada. E bem possfvel digitar 
um tipo de dado correto (ou seja, cordao ou numerico) com um valor inaceitavel. Isto e, o valor 
pode causar um erro no programa num ponto posterior. Aqui esta um pequeno programa que 
demonstra o problema: 


100 INPUT X 
200 PRINT 10Q/X 
300 END 
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Se for digitado 0 em resposta a declaragao INPUT, o programa estoura quando tentar dividir 
por 0 na declaragao PRINT. E bastante facil evitar isso. As linhas seguintes testam a entrada para 
ter ciencia que o valor nao e 0, e pedirao outro numero se for. 

110 IF XOO THEN 200 

120 PRINT "NAO PERMIT I DO ? DIGITE DE NOVO" 

130 GOTO 100 

Estendendo os princi'pios mostrados neste exemplo, pode-se ver o quanto facil e testar um 
valor entrado para manter os limites possi'veis. Dependendo das circunstancias, pode ser melhor 
testar os limites com o ON-GOTO do Applesoft ou o ON-GOSUB (GOTO e GOSUB calculados do 
Integer BASIC), ao inves da serie de declaragdes IF-THEN. Existe um exemplo de detecgao de 
erros mais elaborado na proxima segao. 


O ONERR GOTO e a Declaragao RESUME 

O Applesoft tern uma declaragao especial que permite contornar erros quando os encontra — antes 
que seja colocada uma mensagem ou pare a execucao do programa. Aqui esta um exemplo: 

SO 0NNER GOTO 6000 

Uma vez dada esta declaragao, quando o Applesoft encontrar um erro, pulara para o ende- 
rego 8000. Tambem sera mostrado um codigo numerico descrevendo o erro na posicao de memoria 
222, que podera ser consultada atraves de uma declaragao PEEK. A Tabela C.1 no Apendice C 
tern a relagao de condigoes de erros detectaveis pelo ONNER GOTO. 

A forma usual de tratar os erros com o ONNER GOTO e escrever uma rotina para onde o 
programa va quando ocorra um erro. No final dessa rotina, a declaragao RESUME causa o retorno 
para o im'cio da declaragao onde ocorreu o erro. Alternativamente, uma declaragao GOTO man- 
dara o programa para qualquer enderego. Escreva a rotina de erro de forma que ela tome atitudes 
diferentes dependendo da natureza do erro e do estado presente do programa, o que pode even- 
tualmente ser verificado pela analise dos valores das variaveis-chave. 

Para cancelar o ONNER GOTO e fazer o Apple II voltar a sua forma normal de tratamento 
de erro, use a declaracao POKE 216,0. 

O programa seguinte demonstra o uso do ONNER GOTO. Neste programa, quaisquer erros 
que nao possam ocorrer como resultado de operagao de entrada via teclado sao tratados como 
fatais, com o aparecimento de uma mensagem de advertencia. A entrada e desconsiderada e e 
requisitada nova digitagao. 


50 

ONNER GOTO 8000 



200 

PRINT "entre: UM 

VALOR 

AL.FANUMER ICO* 

210 

INPUT X$ 



220 

PRINT "ENTRE UM 

VALOR 

NUMERICO" 

230 

INPUT X 



240 

PRINT "ENTRE UM 

VALOR 

INTEIRO" 

250 

INPUT X% 



260 

GOTO 200 



500 

REM FIM DO PROGRAMA 
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510 PRINT "ULTIMA ENTRADA KOI ";X$,", "?X!" E ";X% 
515 POKE 21 6 ,0 * REM DESLIGUE POR ERRO 
520 END 

8000 REM ++ ROTINA OE ERRO ++ 

8010 E = PEEK <222)’REM PEGA NUMERO DO ERRO 
8020 IF E = 255 THEN GOTO 500:REM FIM DE PROGRAMA 
COM CTRL-C 

8030 IF E * 53 OR E = 176 OR E = 254 THEN 8100 
8035 INOERSE 

8040 REM DETECTADO ERRO DE PROGRAMACAO 
8050 PRINT "ARRGH! DETECTADO ERRO NUMERO "5E 
8055 PRINT "DEIXE 0 NUMERO NA TELA" 

8060 PRINT "E A DESCRICAO DO OCORRIDO." 

8070 PRINT "CHAME UM PROGRAMADOR PARA AUXII..I A-LO." 
8080 PRINT "DEIXE 0 COMPUTADOR LIGADO." 

8090 NORMAL : STOP 

8100 REM DETECTADO ERRO DE ENTRADA DE DADO 

8110 P RIN T. ", : R E M C A R F A C T E R E C T R L. - G ENT R E A 8 P A S 

8120 PRINT "ERRO, TENTE NOUAMENTE" 

8130 RESUME 


Entrando uma Data Valida 


Nesta parte descreveremos um programa que usa varias tecnicas apresentadas neste capi'tulo. Sao 
usadas algumas fungoes do BASIC e declaragdes dispomveis apenas no Applesoft. 0 programa 
pode ser escrito em Integer BASIC; pode-se fazer a conversao. 

Muitos programas, em algum ponto de sua execupao precisam de entrada de dados nao tao 
simples quanto um sim ou nao, porem nao tao complexas quanto uma tela inteira. Considere uma 
data. 

Deve-se ter mais cuidado com essa entrada de dados simples do que a primeira vista parece 
necessario. E muito provavel que a data seja apenas um item dentro de uma sequencia. Tomando o 
devido cuidado com cada um dos itens numa digitagao, pode-se evitar a digitagao de muitos itens 
sempre que o operador se esquega de um dado. 

Assume-se que a data seja colocada na seguinte forma: 


MM - DD - AA 


Ano 

Separador 
Dia do mes 
Separador 
Mes 


0 mes, dia do mes e ano sao, cada um, entrados como sendo dois dfgitos numericos, colo- 
cados sem a terminagao RETURN. 
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0 programa fornece os tragos de separagao entre os elementos. Dependendo de sua prefe¬ 
rence, pode ser uma barra ou outro caractere desejado. Em muitas partes do mundo o dia prece¬ 
de o mes. 

Programe a entrada de dados de forma que fique agradavel ao operador. Ele deve reconhecer 
facilmente onde o dado deve ser colocado, que tipo de dado eeo que vem depois. Uma forma 
interessante de mostrar onde o dado deve ser colocado e mostrar o nome do campo em vfdeo 
reverso. Por exemplo, o programa que pede a data pode ser criado da seguinte forma com vfdeo 
reverso: 


-Cursor piscando na posigao do dado a ser entrado 

m-gp-m 

t-1--Os dados devem ser entrados nessas posicoes 

Pode-se criar o visual deste programa como segue: 

10 HOME:-- VTAB 3! HTAB 20S REM P OS ICAO PARA ENTRADA 
20 IW = 2: GOSUB 1100s REM CAMPO DE ENTRADA DE 2 DIGITOS 
30 PRINT 

40 60SUB 11 DOS REM CAMPO DE ENTRADA DE 2 CARACTERES 
50 PRINT 

60 60SUB 1100s REM CAMPO DE ENTRADA DE 2 CARACTERES 

70 VTAB 32 HTAB 20s REM REPOSICAO PARA INIC10 DO 
CAMPO DE ENTRADA 
80 END 

1090 REM ++ MOSTRA "IW" ESPACOS EM BRANCO ++ 

1100 INVERSE 

1110 FOR I * 1 TO IWs PRINT " ""s NEXT I 
1120 NORMAL 
1130 RETURN 

0 programa acima inclui declaragoes que posicionam a digitagao da data na coluna 21 e linha 
3. Tambem e limpa a tela de forma que qualquer bobagem anterior nao atrapalhe a introdugao 
do dado. Apos a apresentagao do dado entrado, o cursor se move de volta para a posigao do pri- 
meiro campo de entrada, embora isso nao possa ser apreciado devido a declaragao END. 

Tente usar a declaragao INPUT na linha 80 para receber o primeiro item da data: o mes. Isso 
pode ser feito como segue: 

80 INPUT m 
90 END 


Digite as declaragoes nas linhas 80 e 90 como acima e execute o programa. Como se ve, a 
declaragao INPUT nao opera. Fora o fato do ponto de interrogagao deslocar o primeiro caractere 
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do campo de digitagao, o acionamento do RETURN faz limpar todo o resto da linha de digitagao. 
Esta e a ocasiao de usar a declaracao GET. Coloque as seguintes linhas adicionais de programa: 

80 GOSUB 1200: MM* « C*s REM PEGA PRIMEIRO DIGITO 

DO MES 

90 GOSUB 1200: MM* - MM* + C$: REM PEGA SEGUNDO 

DIGITO DO MES 

1190 REM ++ AOETTA UM CARACTERE DIGITADO 

1200 GET C* 

1 210 P R IN "f 0 * 5 : R E M A P R E S E N T A A DIGIT A C A 0 N 0 UID E 0 

1220 RETURN! 

Essas declaragoes aceitam a digitagao de dois caracteres. A entrada e mostrada no primeiro 
campo reverso da data. A entrada dos dois di'gitos nao pede RETURN ou outro terminador qual- 
quer. 0 programa p^ra se pedir dados apos a entrada do segundo caractere. 

Sao necessarias tres entradas de dois caracteres cada: para o mes, dia e ano. Ao inves de 
repetir as declaragoes das linhas 80 e 90, eolocaremos estas declaragoes numa sub-rotina e iremos a 
ela tres vezes, como segue: 

80 GOSUB 1300: MM* ~ CC$: REM PEGA MES 

80 PRINT REM ESP AGO PARA 0 PROXIMO CAMPO 

180 GOSUB 1300: DD$ = :: CC*s REM PEGA DIA 

190 PRINT REM ESP AGO PARA 0 PROXIMO CAMPO 

280 GOSUB 1300: A A* CC*: REM PEGA ANO 

290 END 

1290 REM ++ PEGA ENTRADA DE 2 CARACTERES ++ 

1300 GOSUB 1200: CC4 CC* + C*s REM PEGA SEGUNDO 
CARAC CERE 
1320 RETURN 

As variaveis MM$, DD$ e AA$ tern o mes, dia e ano, respectivamente. Cada entrada tern dois 
caracteres. 

Existem duas formas pelas quais se pode ajudar o operador a se recuperar de erros durante a 
digitagao. 

1. O programa pode testar automaticamente a validade do mes, dia e ano. 

2. Pode ser dada ao operador a chance de redigitar estes itens. 

0 programa pode testar o mes entre 1 e 12. Os anos bissextos nao precisam ser considerados, 
porem pode-se testar a existencia de um dia num dado mes. Qualquer ano entre 00 e 99 sera per- 
mitido. Qualquer digitagao invalida fara o programa requisitar todos os itens novamente. 

Se o operador acionar a tecla RETURN, toda a seqiiencia reinicia. Nossa versao final do 
programa de entrada de dados ficarci assim: 
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10 HOME : UTAB 3s HTAB 20 s REM P081ClONA PARA DIGITACAO 
15 RC* » CHR$ (13)s REM PERMITE REINICIO DE DIGITACAO 

17 REM 

18 REM M08TRA 3 CAMPOS DE 2 CARACTERES CADA 

19 REM 

20 IU a 2s GOSUB 1100 
30 PRINT 

40 GOSUB 1100 
50 PRINT 
60 GOSUB 1100 

65 PRINT REM CTRL-G * BELL 

67 REM 

68 REM PEGA ENTRADA DE 3 CAMPOS 

69 REM 

70 UTAB 3s HTAB 3s REM POSICIONA NA INIGIO DOS CAMPOS 
DE ENTRADA 

79 REM 

80 REM PEGA MES 

81 REM 

90 GOSUB 1300s IF C* = RC* THEN GOTO 10s REM TESTE PARA 
REINICIO DE ENTRADA 

100 MM a UAL <CC$>5 REM MES EM NUMERIC© 

110 IF MM < 1 OR MM > 12 THEN 10s REM TESTE DE MES 
INEXISTENTE 

120 DT$ « CC$s PRINT "~"?s REM AUANCA PARA PROXIMO CAMPO 

125 REM UE 0 MAIOR NUMERO DE DIAS DESTE MES 

130 DM a 31s REM ASSUME 31 DIAS 

135 REM A MENOS DE FEVEREIRO 

140 IF MM a 2 THEN DM a 29 

150 REM OU ABRIL, JUNHO, SETEMBRO OU NOVEMBRO 

160 IF MM « 4 OU MM = 6 OR MM = 9 OR MM a n THEN DM * 30 

169 REM 

170 REM PEGA DIA 

171 REM 

180 GOSUB 1300s IF C$ a RC* THEN GOTO 10 s REM TESTE PARA 
REINICIO DE DIGITACAO 

190 DD « UAL <CC$)s IF DD < 1 OR DD > DM THEN IQ: REM 
REINICIO SE ENTRADA FOI INVALIDA 
200 DT$ = DT* + + CC$= PRINT ^-"s REM AUANCA PARA 0 

PROXIMO CAMPO 

269 REM 

270 REM PEGA ANO 

271 REM 

280 GOSUB 1300s IF C$ « RC$ THEN GOTO 10s REM TESTE PARA 
REINICIO DA DIGITACAO 
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290 YY = UAL <CC$): IF YY < 0 OR YY > 99 THEN 10s REM 
REINICIO PARA ENTRADA INVALIDA 
300 DT$ « DT$ + + CC$ 

309 REM 

390 REM MOSTRA A ENTRADA 

391 REM 

400 UTAB (10) s H TAB M8): PRINT "DATA DIG IT ADA s" 

410 UTAB <11)s HTAB <18)5 PRINT DT$ 

420 END 

1089 REM 

1090 REM + + MOSTRA "IW" CARACTERES EM BRANCO REVERSO ++ 

1091 REM 
1100 INVERSE 

1110 FOR I « i TO IUs PRINT " " * s NEXT I 
1120 NORM AL¬ 
II 30 RETURN 

1189 REM 

1190 REM ++ ACEITA ENTRADA DE 1 CARACTERE + + 

1191 REM 

1200 GET C*s IF C* « THEN 1200 

1210 IF C$ a rc* THEN RETURNS REM TESTE PARA REINICIO 
1220 IF C* < "0" OR C* > "9" THEN 1200 
1230 PRINT C$?s REM SAX CARACTERE 
1240 RETURN 

1289 REM 

1290 REM ++ PEGA ENTRADA DE 2 CARACTERES ++ 

1291 REM 

1300 REM PEGA PRIMEIRO CARACTERE? TESTA REINICIO 
1310 GOSUB 1200: IF C$ RG* THEN RETURN 
1315 CC$ --=C$ 

1320 REM PEGA SE6UND0 CARACTERE? TESTA REINICIO 
1330 GOSUB 1200: IF CS « RC$ THEN RETURN 
1340 RETURN 


Note que a data ficou presente num campo cordao de 8 caracteres, o DT$, apos a digitagao 
do mes, dia e ano. 

Sao feitas tres verificagoes nos dados no momento da digitagao: 

1. 0 caractere e carriage return ? 

2. Se nao, e um caractere vdlido? 

3. A combinagao de 2 caracteres e um mes valido para a primeira digitagao, um dia valido 
para a segunda e um ano valido para a terceira? 

Selecionamos o carriage return para caractere de reinfcio. Trocando o CHR$(13) na linha 15, 
pode-se selecionar qualquer outro caractere que se queira. Quando o operador aciona a tecla esco- 
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Ihida, toda a sequencia de entrada e reiniciada. Deve*se perguntar pelo caractere de reim'cio a cada 
um digitado, na rotina apropriada (na linha 1200) e depois na sub-rotina de digitapao de dois 
caracteres (na linha 1300) desde que desejamos estar aptos a voltar ao irn'cio da digitapao do 
primeiro ou segundo caractere. 0 programa principal tambem verifica se o caractere de reim'cio foi 
digitado para voltar para a linha 10 e reiniciar toda a entrada de dados. Poden'amos tambem pular 
diretamente da rotina de entrada de um caractere para a linha 10, eliminando assim outros testes. 
Porem nao e uma boa pratica sair de uma sub-rotina com um GOTO ao inves de um RETURN. 
Toda a sub-rotina deve ser tratada como um modulo logico, com parametros especfficos de entrada 
e retornos padronizados. Sair de uma sub-rotina de qualquer outra forma conduz facilmente a 
programas diffceis de entender e a erros de programapao. (Lembre-se que antes de se sair de uma 
sub-rotina sem o RETURN, deve-se dar um POP para limpar o enderepo de retorno que ficou guar- 
dado.) 

A logica do programa que testa os caracteres nao numericos ficou inteiramente localizada 
dentro da digitapao de um caractere. Ignoramos dfgitos nao numericos. A declarapao que faz isso 
estci na linha 1220. 

A logica para teste de mes, dia e ano vSlidos deve estar contida dentro do programa principal 
(fora da sub-rotina) desde que cada uma dessas entradas tern um limite permitido diferente. 

A declarapao da linha 110 testa o mes valido. 

As declarapoes das linhas 130, 140 e 160 verificam o maximo dia permitido para o mes 
entrado. A declarapao da linha 190 testa um dia valido. 

0 teste de validade do ano e bem simples, e esta na linha 290. 

Leva-se mais tempo para escrever um programa com entrada de dados que mostrem infor- 
mapoes de forma mais concisa e testa-se a validade dos parametros, permitindo ao operador a redi- 
gitapao a qualquer momento. Sera que esse tempo e bem gasto? Muito bem gasto. O programa 
sera escrito uma so vez; ja o operador processara a rotina centenas ou milhares de vezes. Dessa 
forma ser3 gasto um tempo extra por uma vez, para que o operador nao tenha centenas ou milha¬ 
res de atrasos. 


FORMAS DE ENTRADA DE DADOS 


A sepao seguinte descreve algumas tecnicas de programapao que sao melhor implementadas no 
Applesoft. Muitos dos efeitos especiais usados neste exemplo de programa sao diffceis, ou mesmo 
impossfveis, de se obter com o Integer BASIC. Se nao houver outra alternativa alem dele, ainda 
podera ser interessante a leitura desta sepao para o aproveitamento eventual de algumas tecnicas 
com o Integer BASIC. 

A melhor forma de se entrar muitos itens num programa e apresentar um formulario na tela, 
e preenche-lo com os dados entrados. Considere um nome e enderepo. Primeiro apresente um 
formulario como abaixo: 

ENTRE NOME E ENDEREQO ABAIXO 
fl NOME: 

« ENDEREgO: 

C] CIDADE: 

SJ ESTADO: 


A CEP: 
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Veja que a cada item estS associado um numero. 0 numero do campo aparece em vi'deo 
reverso neste formulario. 

0 operador entra os dados sequencialmente, comegando com o item 1 e terminando com o 
5. 0 operador pode entao alterar qualquer campo. 

0 programa seguinte limpa a tela e mostra o formulario inicial: 

109 REM 

110 REM MOSTRA 0 FORMULARIO DE ENTRADA DE DADOS 

111 REM 

120 CALL -936s VTAB 2s REM LIMPA A TELA E 
P081CIONA 0 CURSOR 

125 PRINT "ENTRE 0 NOME E 0 ENDERECO ABAIXO" 

•130 REM PRIMEIRO MOSTRA OS NUMEROS DOS CAMPOS" 

140 INVERSE 

150 FOR I * 1 TO 4: HTAB 2s PRINT Is NEXT I 
160 VTAB 6s HTAB 29s PRINT 5 
170 NORMAL 

ISO REM MOSTRA OS NOMES DOS CAMPOS 
190 VTAB 3s HTAB 6s PRINT "NOME s" 

200 VTAB 4s PRINT "ENDERECO: " 

210 HTAB 65 PRINT "CIDADEs" 

220 HTAB 5s PRINT "ESTADOs" 

230 HTAB 315 PRINT "CEP:" 


Serao criados campos de vi'deo reverso para informar onde os dados entrados devem ser 
colocados a medida que vao sendo digitados. 0 CTRL-X e usado para reiniciar a entrada de dados 
no campo corrente. A tecla RETURN termina a digitagao do campo. A sequencia de instrugoes 
seguinte fornece a logica de programa necessaria: 


100 RC$ = CHR5> (24): REM CTRL-X COMO CARACTERE DE REINICIO 
200 REM 

300 REM ENTRA TODOS OS 5 CAMPOS 

301 REM 

310 FOR I - 1 TO 5: 60SUB 1900: NEXT F 
320 END 

990 REM ++++++++ SUBROTINA 1000 ++++++++++++ 

991 REM ENTRA CORDAO DE DADOS NO CAMPO COM LN CARACTERES 

992 REM 0 CURSOR DEVE ESTAR NA PRIMEIRA POSICAO DO CAMPO 

993 REM A TECLA RETURN TERMINA 0 CAMPO 

994 REM A TECLA "FL.EXA A ESQUERDA" REINICIA A ENTRADA 

995 REM NAO TESTA A UALIDADE DO DADO ENTRADO 
994 REM 0 CORDAO ENTRADO VOLTA EM CC$ 

997 REM 

1000 HT = POS <0> + 1: REM LEMBRA POSICAO DO INICIO DO CAMP 
1010 REM MARCARA COM VIDEO REVERSO 
1020 INVERSE 

1030 FOR I a 1 TO N: PRINT " "5: NEXT I 

1040 NORMAL: HTAB (HT): REM REPOSICIONA NO INICIO DO CAMPO 
1050 REM ENTRA DADO 



136 


APPLE II 


1060 CC$ ~ REM INICIA ENTRADA COM NULO 

1070 GET C$ 

•1080 IF- C* * rc$ THEN HTAB < HT) ’ GOTO 1020: REM REINICIA ENTRADA? 
1090 IF C$ « CHR$ (13) THEN GOTO 11-40: REM FIM DE ENTRADA? 

1100 REM QUANGO ENTRADA TERMINA * ESPERA FOR RETURN OU REINICIO 
1110 IF LEN <CC*> ~ L.N THEN GOTO 1070 
1120 PRINT C$": REM SAI CARACTERE TECLADO 
1130 CC*> ~ CC$ + C$: GOTO 1070 
1140 J a LEN <CC$> 

1150 FOR I = J TO LN: CC1> = CC1> + " NEXT I 

1160 REM RECOLOCA A ENTRADA 

1170 HTAB <HT): PRINT CC$? : RETURN 

1889 REM +++++++++++ SUBROTINA 1900 +++++++++++++++ 

1890 REM PULA PARA ROTINA DE ENTRADA PARA CAMPO NUMERO F 

1891 REM 

1900 ON F GOTO 2000r2100r2200,2300,2400:RETURN 

1989 REM 

1990 REM ENTRAM 20 CARACTERES -NOME- 

1991 REM 

2000 UTAB 3: HTAB 11 

2010 L.N * 20: G08UB 1000: NA$ - CC$: RETURN 

2089 REM 

2090 REM ENTRAM 20 CARACTERES - ENDERECO - 

2091 REM 

2100 UTAB 4: HTAB 11 

2110 LN = 20: GOSUB 1000:ClCC$: RETURN 

2189 REM 

2190 REM ENTRAM 20 CARACTERES - ClDADE - 

2191 REM 

2200 UTAB 5: HTAB 11 

2210 LN « 20: GOSUB 1000: RETURN 

2289 REM 

2290 REM ENTRAM 18 CARACTERES - ESTADO - 

2291 REM 

2300 UTAB 6 : HTAB 11 

2310 LN « 18: GOSUB 1000: ST$ « CC1>: RETURN 

2389 REM 

2390 REM ENTRAM 5 CARACTERES - CEP - 

2391 REM 

Digite o programa inteiro da declaracao 100 ate 2410 e execute. Lembre-se de que ainda 
existem as declaragoes de 109 a 230 digitadas do exemplo anterior, de forma que nao e necessario 
recolocar. 

Se o programa nao rodar direito, confira a listagem com cuidado. Em particular as declara- 
qoes PRINT. 

Na execupao do programa, cada um dos cinco campos vai ficar destacado por sua vez. Assim 
que os caracteres forem digitados eles serao transferidos para o vfdeo. Ao se acionar o RETURN, 
todo o campo sera substitufdo pelo conteudo final teclado. Tente o uso de Ctrl-X para reiniciar 
a entrada de dados. 

Analise com cuidado a logica da sub-rotina de entrada de cordao, iniciando na linha 1000 e 
indo ate a 1170. Antes de seguir adiante sugere-se que se entenda perfeitamente a logica embutida 
nesta parte. 
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Veja como e facil entender o que se esta digitando, e como e facil reiniciar a digitagao para 
corrigir erros. 

Depois da digitagao completa de nome e enderego, o programa deveria perguntar ao opera- 
dor se algum campo deve ser alterado; depois deveria pedir qual o campo. Uma rotina de pergunta 
SIM-NAO ja foi vista antes neste capi'tulo. Usaremos uma versao modificada dela, onde o programa 
que chama fornece a pergunta a ser feita ao operador. Aqui esta a listagem completa do programa 
adicionando os comentarios necessarios. 


9 REM ***************xx**x**x*******x*xxxxx*********x**************** 

10 REM ESTE PROGRAMA MOSTRA LJM FORMULAR10 PARA ENTRAR NOME E ENDERECO 
•11 REM E PEDE EM SEGUIDA A ENTRADA DESSES DADOS 

12 REM ************************************************************** 

13 REM 

100 RC* = CHR* (24) : REM CTRL.-X a CARACTERE DE REINICIO 

109 REM 

110 REM MOSTRA 0 FORMULAR10 DE ENTRADA DE DADOS 

111 REM 

120 CALL ~936: VTAB 2: REM LIMPA A TELA E POSICIONA 0 CURSOR 
125 PRINT "ENTRE 0 NOME E 0 ENDERECO ABAIXO" 

130 REM PRIMEIRO MOSTRA OS NUMEROS DOS CAMPOS" 

140 INVERSE 

150 FOR I = 1 TO 4S HTAB 2: PRINT I: NEXT I 
160 VTAB 6: HTAB 29: PRINT 5 
170 NORMAL 

180 REM MOSTRA OS NOMES DOS CAMPOS 
190 VTAB 3: HTAB 6: PRINT "NOME:" 

200 VTAB 4: PRINT "ENDERECO:" 

210 HTAB 6: PRINT "CIDADE:" 

220 HTAB 5: PRINT "ESTADO:" 

230 HTAB 31: PRINT "CEP:" 

299 REM 

300 REM ENTRA TODOS OS 5 CAMPOS 

301 REM 


310 

320 

990 

991 

992 

993 

994 

995 

996 

997 
1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 


FOR I - 1 TO 5: GOSUB 1900: NEXT F 
END 

REM +++++ +++ SUBROTINA 1000 + +++-M •+ +++ + + 

REM ENTRA CORDAO DE DADOS NO CAMPO COM LN CARACTERES 

REM 0 CURSOR DEVE ESTAR NA PRIMEIRA POSICAO DO CAMPO 

REM A TECLA RETURN TERMINA 0 CAMPO 

REM A TECLA "FL.EXA A ESQUERDA" REINICIA A ENTRADA 

REM NAO TESTA A VAL.IDADE DO DADO ENTRADO 

REM 0 CORDAO ENTRADO VOLTA EM CC$ 

REM 

HT « POS <0> + 1: REM LEMBRA POSICAO DO INICIO DO CAMPO 

REM MARCARA COM VIDEO REVERSO 

INVERSE 

FOR I a i TO IN: PRINT " NEXT I 

NORMAL: HTAB (HT): REM REPOSICIONA NO INICIO DO CAMPO 
REM ENTRA DADO 

CC* = REM INICIA ENTRADA COM NULO 

GET C$ 

IF C$ = RC$ THEN HTAB (HT): GOTO 1020: REM REINICIA ENTRADA? 
IF C* = CHR$ (13) THEN GOTO 1140: REM FIM DE ENTRADA? 

REM QUANDO ENTRADA TERMINA, ESPERA POR RETURN OU REINICIO 
IF LEN <CC$> = LN THEN GOTO 1070 
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1120 PRINT Civ;: REM SAI CARACTERE TECLADO 
1130 CC* = CC* + C$: GOTO 1070 
1140 J » LEN < CC*) 

1150 FOR I « J TO LN: CC* * CC* + " NEXT I 

1160 REM RECOLOCA A ENTRADA 

1170 HTAB (NT): PRINT CC*;: RETURN 

1189 REM +++++++++++ SUBROTINA 1200 +++++++++++++++ 

1190 REM LIMP A A L.INHA ONDF. ESTA 0 CURSOR 

1191 REM 

1200 HTAB * is REM COMECA NO INICIO DA LINHA 
1210 FOR I = 1 TO 39: PRINT " ";: NEXT I 
1220 HTAB 1: REM DEIXA CURSOR NO INICIO DA LINHA 
1230 RETURN 

1289 REM ++++++++++ SUBROTINA 1300 +++++++++++++++++ 

1290 REM FAZ UMA PERGUNTA <QU*> E RETORNA RESPOSTA S OU N EM YN* 

1291 REM 

1300 60SUB 1200: REM LIMPA TODA A LINHA 
1310 PRINT QU*;: REM MOSTRA A PERGUNTA 

1320 GET YN*: IF YN*< >"N" AND YN* < >~Y" THEN GOTO 1320 
1330 PRINT YN*;: REM MOSTRA RESPOSTA 
1340 RETURN 

1389 REM ++++++++++ SUBROTINA 1400 +++++++++++++++++ 

1390 REM PEDE ENTRADA NUMERICA (PERGUNTA QU$> 

1391 REM RESPOSTA OEM EM NM 

1392 REM NM DEUE SER <=HI E >^-L0 

1393 REM 

1400 GOSUB 1200: REM LIMPA LINHA DE ENTRADA 
1410 PRINT QU*; : REM MOSTRA PERGUNTA 
1420 GET C*: NM * UAL <C*) 

1425 REM 9E SE ESTA DENTRO DA FAIXA 
1430 IF NM < LO OR NM > HI THEN GOTO 1420 
1440 PRINT C*;: REM SAI RESPOSTA 
1450 RETURN 

1889 REM +++++++++++ SUBROTINA 1900 +++++++++++++++ 

1890 REM PULA PARA ROTINA DE ENTRADA PARA CAMPO NUMERO F 

1891 REM 

1900 ON F GOTO 2000,2100r2200>2300r2400:RETURN 

1989 REM 

1990 REM F.NTRAM 20 CARACTERES -NOME- 

1991 REM 

2000 VTAB 3: HTAB 11 

2010 LN = 20: GOSUB 1000: NA$ = CC$: RETURN 

2089 REM 

2090 REM ENTRAM 20 CARACTERES - ENDERECO - 

2091 REM 

2100 UTAB 4: HTAB 11 

2110 LN * 20: GOSUB 100Q:CI$= CC$: RETURN 

2189 REM 

2190 REM ENTRAM 20 CARACTERES - ClDADE - 

2191 REM 

2200 9TAB 5: HTAB 11 

2210 LN * 20: GOSUB 1000: RETURN 

2289 REM 

2290 REM ENTRAM 18 CARACTERES - ESTADO - 

2291 REM 

2300 VTAB 6: HTAB 11 

2310 LN = 18: GOSUB 1000: ST* = CC*: RETURN 

2389 REM 

2390 REM ENTRAM 5 CARACTERES - CEP - 

2391 REM 

2400 OTAB 6: HTAB 35 

2410 LN » 5: GOSUB 1000: ZP = CC*: RETURN 
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Estude o programa acima cuidadosamente e entenda a forma como foi feito e as observacoes 
inseridas. Sao elas: 

1. Numerar cada campo e justapor uma mascara de vfdeo reverso no momento apropriado, 
isso deixa saliente o campo a ser digitado e o espago dispom'vel. 

2. Quando o operador entra com o numero do campo para ser modificado, a mascara tam- 
bem informa rapidamente se foi dado o numero de campo correto. 

3. 0 operador nao precisa preencher todos os caracteres de cada campo; ao acionar a tecla 
RETURN, o resto do campo e preenchido com espagos. 

4. A qualquer momento pode-se reiniciar a digitagao com a tecla Ctrl-X. 

5. Quando sao feitas perguntas, apenas sao aceitas respostas com significado, tipo S ou N 
para "sim" ou "nao" ou urn numero entre 1 e 5 para especificar urn campo. Nao e bom 
permitir-se a entrada de respostas sem significado. Por exemplo, aceitar a resposta S para 
"sim" e qualquer outra tecla para "nao" poderia, por acidente, provocar a safda do pro¬ 
grama de forma desastrosa. 0 contrario, aceitar N para "nao" e qualquer tecla para "sim" 
poderia muitas vezes obrigar o operador a redigitar dados desnecessariamente, apenas por 
ter acionado uma tecla errada. 

Abaixo vao outros aperfeigoamentos que nao foram colocados, mas poderiam.se-lo: 

1. Testar o codigo de CEP para nao haver entrada nula (existem codigos similares em muitos 
pafses para permitir entrada alfabetica). 

2. Os programadores mais cautelosos ainda fazem a pergunta VOCE TEM CERTEZA? 
Quando o operador responde NAO a pergunta QUER FAZER ALGUMA MODIFICA- 
CAO? Isso da ao operador uma segunda chance de redigitar os dados no caso de ter digi¬ 
tado uma tecla errada. 

3. Uma tecla que aborte a entrada atual de dado e devolva o valor anterior. Por exemplo, 
se o operador alterou o campo errado, o programa do exemplo faz com que ele seja forga- 
do a redigitar o campo inteiro. Ele poderia facilmente reconhecer uma tecla que elimine 
a entrada e devolva o conteudo anterior. 

4. Permitir o acionamento da tecla «- como retorno de espago. Cada vez que a tecla «- for 
acionada, o cursor volta urn espago e o ultimo caractere entrado e substitufdo pela mas¬ 
cara em vfdeo reverso na tela e por urn caractere em branco na rotina de safda de CCS. 
Claro, nao pode haver o retorno de espago no primeiro caractere de esquerda do campo. 

Tente modificar o programa exemplo para implementar as melhorias acima. 


FORMATAQAO DE SAIDA 

Quando se liga o Apple II, automaticamente a safda e a tela. Existem declaragoes que permitem 
mandar dados para outros dispositivos tal como impressora e outros que aceitem dados de safda. 

Existem algumas diferengas na programagao de safda pela tela em comparagao com impres¬ 
sora. Por exemplo, a impressora pode ser mais larga que a tela, de forma que uma linha de safda 
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caiba dentro de uma linha da impressora e pule para a linha de baixo na tela. Por outro lado, o 
HTAB e o VTAB (TAB no Integer BASIC) podem ser usados para mover o cursor pela tela, porem 
nao podem ser usados para mover o cursor pelo espago de uma folha de papel. 

Existem tambem muitas similaridades nas tecnicas de programagao usadas para criar safdas 
na tela e na impressora. Muito do que sera visto adiante se aplica a ambas. Aquilo que se aplicar 
apenas a vfdeo sera devidamente indicado. Se houver interesse em programar safdas por impres¬ 
sora, devem ser lidas as orientagoes especfficas, no final deste capftulo. 

Programar a safda de dados e mais simples que a entrada, desde que nao e necessario se preo- 
cupar com a interagao com o operador. Deve-se tornar a informagao facii de ser usada, e nada mais. 
Aqui estao algumas poucas regras para seguir: 

1. Evite concentrar muita informagao dentro de urn espago-pequeno. 

2. Se numeros ou letras forem listados em colunas, alinhe os dados de forma que o olho 
possa varrer a coluna com facilidade. 

3. Use vfdeo reverso para salientar informagoes chaves, cabegalhos em cima e ao lado (ape¬ 
nas para vfdeo). 

Abaixo estao dicas que ajudarao a evitar erros desnecessarios na programagao de safda de 
dados: 

1. Lembre-se de seguir cada item numa declaragao PRINT com um ponto-e-vfrgula, a menos 
quesedesejaespagamento em colunas. Este e o erro mais comum nas declaragoes de safda. 

2. Antes de fazer qualquer coisa, projete sua tela ou relatorio. Use uma folha de papel para 
graficos ou um formulario feito especialmente para projetos de relatorio. 0 Apendice L 
tern uma tela que permite calcular linhas e colunas com precisao. A alternativa para isso 
e o metodo de tentativa e erro, que no fim faz perder muito mais tempo que se o formu¬ 
lario for projetado antecipadamente. 

3. Procure subscrever arranjos que nao se dividam em colunas pares. Por exemplo, suponha 
que se tern 25 itens num arranjo N$(l) que serao colocados em tres colunas. Pode-se ser 
tentado a fazer algo como abaixo: 

100 FOR I = 1 TO 25 STEP 3 
200 REM PROCESSO DA COLUNA 1 


300 REM PROCESSO DA COLUNA 2 


400 REM PROCESSO DA COLUNA 3 


500 NEXT I 
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Mas na passagem final do loop FOR-NEXT, os indices 26 e 27 serao computados, 
embora nao existam. Pode-se facilmente testar o fim do arranjo num loop FOR-NEXT, 
como abaixo: 

100 FOR I = 1 TO MX STEP ST 


350 I = I + 1 

360 IF I > MX THEN 510 


500 NEXT 

510 REM CONTINUA O PROGRAMA 


A Tela Como Janela de Dados 

Quando se lida com grande quantidade de dados, uma tecnica muito comum e a de se usar a tela 
como uma janela de dados. Durante todo o tempo o vfdeo mostra apenas uma parte dos dados 
existentes. Uma forma de fazer isso e agrupar os dados em paginas, cada uma cabendo na tela. 
Os programas que usam essa tecnica devem ter rotinas especiais para mostrar o cabegalho e os 
valores dos dados em cada pagina. Deve haver tambem alguma forma do programa mudar de uma 
pagina para a outra. 

E muito comum os arranjos guardarem grandes quantidades de dados. Nesse caso, pode-se 
usar a tela como o visor de uma camara. Imagine que o arranjo de dados e escrito numa grande area 
e pode-se observar esta area atraves de uma camara. A area e tao grande que nao se pode observar 
todo o espago pela camara de uma so vez, porem pode-se ver partes pelo movimento da camara 
para cima, baixo, direita e esquerda. A tela pode imitar isso. 

Vamos ilustrar o uso da tela como janela de dados criando urn exemplo no Applesoft da 
janela acima descrita. De irn'cio, vamos criar um arranjo inteiro em duas dimensoes. Como valor 
para cada elemento do arranjo, associaremos numeros de 4 dfgitos que identifica os indices, como 
segue: 


X% (/,/) = 0 / 0/ 


Por exemplo: 


X% (3,2) = 0302 
X%(19,8) = 1908 
X% (11,12) = 1112 


Pode-se inicializar este arranjo inteiro de forma simples, como segue: 
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10 

DIM X%<14 j 

•50) 

20 

FOR I * 1 

TO 

30 

FOR J = 1 

TO 

40 

X% ( I r J > « 

I * 

50 

NEXT J 


60 

NEXT I 



Agora vamos mostrar uma parte deste arranjo. Usaremos as duas linhas superiores da tela 
para cabegalho e os primeiros nove espagos de cada linha para cabecalho lateral, como abaixo: 



0 numero atual da coluna vai aparecer onde se ve o XX acima. O numero atual da linha vai 
aparecer onde se ve YY. Aqui esta o programa necessario para criar cabegalhos de linhas e colunas 
em vi'deo reverso: 


1000 

INVERSE 


1020 

FOR I a 1 TO 3 


1030 

HTAB 4 + I * 10"- PR INT "COLUNA" ? 


1040 

NEXT I 


1050 

PRINT 


1060 

FOR I « 0 TO 2 


1065 

REM 1 ESPAGO EXTRA ANTES DO PR IMEIRO 

DIOITO 

1070 

8% « Os IF C$ + I < 10 THEN S% -= 1 


1080 

HTAB 18 + I * 10s PRINT SPC<S%)3C% + 

I? 

1 090 

NEXT I 
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11 DO 

PRINT 



1110 

FOR I * 

R% TO R% + 9 


1115 

REM 1 E 

SPACO EXTRA ANTES DO 

PR I MEIRC DIGITOS. 

11 20 

S% * Os 

IF I < 10 THEN S% * 

1 

1130 

HTAB 2= 

PRINT "LINHA"?: HTAB 

8: PRINT SPC<S%)?I 

11 40 

NEXT I 



1150 

NORMALS 

RETURN 



Criamos deliberadamente uma janela que e menor do que a tela de forma a ficar melhor 
ilustrado o conceito de janela de dados. Nao ha nada que impepa que se crie uma janela que ocupe 
toda a tela; porem havera ocasioes em que se deseje uma janela pequena de forma que outros 
dados aparecam concorrentemente no vi'deo. 

Adicionaremos agora instrucoes para pedir ao operador dois numeros representando a menor 
linha e a menor coluna do arranjo. 0 elemento do arranjo com esta linha e coluna aparecera no 
alto a esquerda da tela. Os elementos adjacentes a este aparecerao de forma a preencher toda a 
janela. Aqui esta o programa inteiro: 

5 REM JANELA HUM PROGRAMA DE MOSTRAR TABELA 

6 R E M * * # * « * ¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥ X- ¥¥¥¥¥¥¥¥¥¥¥¥¥¥ *• ¥ ¥ ¥ ¥: ¥ ¥ ¥ ¥¥¥¥ ¥ ¥¥¥¥ 

10 HOMES PRINT "EBPERE/ PROCESSO DE INICIALIZACAO"? 

20 DIM X% (1-4x50) 

30 FOR I * 1 TO 14 

40 FOR J * 1 TO 50 

50 X%(I,J) =:: I * 100 + J 

60 NEXT J 

70 NEXT I 

75 home: 

80 HT A B 1s U TAB 20s IN P U T "E N TRE 0 0L UNA <1 A 12):" ?C% 
90 IF C% < 1 OR C% > 12 THEN GOTO 80 
1 0 0 U T A B 21 : IN P U T " E N T R E LIN H A (1 A 41 ) 5 " j R % 

110 IF R% < 1 OR R% > 41 THEN GOTO 100 

1 20 U TAB 1 s H T AB 1 s G 0SUB 1000 s R E M M OS TR A C AB ECALHOS 

130 REM PREENCHE UALORES DA JANELA 
135 UTAB 3 

140 FOR 1*1 TO R% -y 9 

150 HTAB 10 

160 FOR J * C% TO C% + 2 

165 REM MOSTRA UALORES DA JANELA ALINHADOS A DIREITA 
170 X$ » S CR$ < X%(JyI))s PRINT SPO(10-LEN<X$))sX*: 

180 NEXT J 

190 PRINTS REM PROXIMO LINHA 
200 NEXT I 

210 UTAB 22s PRINT "CONTINUA? ENTRA S OU Ns"? 

220 GET C$: IF C$ <> "S" AND C* <> "N" THEN 220 

230 IF C$ * B" THEN GOTO 80 

240 END 
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990 REM 

991 REM + + +++ + ++++++ SUB ROTINA 1000 + + + + + + + + + + + + +'++ 

992 REM SAI CABECALHOS DE LINHAS E COLUNAS 

1000 INVERSE 

1020 FOR 1=1 TO 3 

1030 HTAB 4 + I * 10s PRINT "COLUNA"? 

1040 NEXT I 

1050 PRINT 

1060 FOR I = 0 TO 2 

1065 REM 1 ESPACO EXTRA ANTES DOS NUMEROS DE 1 DI6IT0 

1070 S% = Os IF C% + 1 < 10 THEN S% = 1 

1080 HTAB 18 + I * 10s PRINT SPC<S%)?C% + I? 

1090 NEXT I 
1100 PRINT 

1110 FOR I = R% TO R% + 9 

1115 REM 1 ESPACO EXTRA ANTES DOS NUMEROS DE 1 DIGI TO 

1120 S% = 0= IF I < 10 THEN 8% = 1 

1130 HTAB 2: PRINT "LINHA" ? s HTAB 8s PRINT SPC<S?0?I 

1140 NEXT I 

1150 NORMALS RETURN 

Coloque este programa no computador e execute-o. Se tudo for executado corretamente, 
a primeira coisa que acontecera e o computador parar por instantes; ele estara rodando a rotina 
FOR-NEXT aninhada das linhas 30 ate 70. Sao gastos de 5 a 10 segundos para preencher o arranjo 
X% com numeros. 0 programa da uma mensagem de advertencia sobre isso. Sem tal mensagem, 
o operador poderia pensar que o computador nao esta operando. E sempre bom dar tais mensagens 
quando o sistema fica parado por um intervalo de tempo consideravel. 

Veja que sao permitidas as colunas de numero 1 ate 12. Existem tres colunas, embora qual- 
quer coluna de numero maior que 12 ficara dentro do arranjo de 14 colunas. Linhas de numero 
1 a 41 sao permitidas, desde que o numero de linhas iniciando em 41 atingiriam 50, que e a outra 
dimensao do arranjo. 

O valor inteiro do arranjo X% e convertido para cordao na linha 170, antes de ser mostrado. 
Fizemos a conversao para simplificar a formatagao de safda. Assim fica facil de calcular o numero 
de espagos entre colunas, como mostrado pela declaragao PRINT na linha 170. Nao e tao fScil 
alinhar valores numericos corretamente quando sao impressos diretamente. Para ver isso, troque o 
conteudo da linha 170 por: 

170 PRINT SPC (7); X% (J, I); 

Os numeros serao alinhados nao permitindo mostrar numeros de quatro dfgitos — tornando o 
comando de impressao muito grande para uma tela de 40 caracteres. 

Nosso programa toma bastante cuidado para terminar a safda na 39? coluna do vfdeo, ao 
inves de na 40? e ultima. Se forem colocados caracteres na 40? coluna, aciona-se o mecanismo 
automatico de salto de linha para continuar na proxima. Deve-se evitar o conflito entre os retornos 
devidos ao processo automatico e os devido ao programa. 

Como exercfcio, seria interessante modificar o programa de mostrar a tabela de forma a 
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fazer com que passe da 40? coluna. Para fazer isso deve-se trocar a tabulapao da linha 150 de 10 
para 11, na linha 1030 de 4 + 1*10 para 5 + 1*10, na linha 1080 de 18 + 1*10 para 19+1*10 e 
finalmente na linha 1130 de 4 e 5 para 5 e 9. Tente rodar agora o programa; as colunas de numeros 
aumentaram, porem ha muitos retornos e os numeros das colunas no cabeqalho do alto sao cober- 
tos pela primeira linha dos valores do arranjo. Veja se e possfvel eliminar os retornos extras e gerar 
a tela corretamente. Essa nao e uma tarefa facil. 

Veja que as declaragoes que pedem dados nas linhas 80, 100 e 220 sao seguidas por passos 
de programa que impossibilitam digitaqao de dados invalidos. Mesmo num programa de demons- 
tracao perdemos tempo para criarmos rotinas de seguranca na entrada de dados. 

Urn refinamento util para o programa e a possibilidade de dar ao operador a chance de 
mover a janela para cima e para baixo, ou para a direita e esquerda. Isso e facil. Usaremos as teclas 
I, J, K e M para direcionar o controle de forma semelhante aquela usada na edipao (descrita no 
Capi'tulo 3). A tecla I move uma linha para cima. M desce uma linha, J move uma coluna para a 
esquerda e K uma coluna para a direita como mostrado a seguir: 


/f! 
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Para fazer esta tarefa precisamos trocar as linhas 210 a 240 com as seguintes declaracoes: 

210 UTAB 22: PRINT "CONTINUA?" 

215 PRINT "ENTRE DIRECAO (I,J,K,M),S OU N "5 
220 GET C$ 

225 REM ABAIXO UMA LINHA 

230 IF R% > 1 THEN IF Cf = "M~ THEN KX = R% - 1: GOTO 120 
235 REM S0BE UMA LINHA ? 

240 IF R% < 41 THEN IF CS •» "J" THEN CX = CX - 1: GOTO 120 
245 REM ESQUERDA UMA COLUNA ? 

250 IF 0% > 1 THEN IF C$ == "J" THEN CL = CX - 1: GOTO 120 
255 REM DIREITA UMA COLUNA ? 

260 IF CX < 12 THEN IF CX ~ "K" THEN CX ® CX + Is GOTO 120 
270 IF C* " "S" THEN GOTO 80s REM ENTRA NOMA LINHA E COLUNA 
280 IF 0* ~ "N" THEN END 

285 REM TOCA 0 SINO (BELL) E REJEITA 0UTRA LETRA 
290 PRINT CHR$<7);: GOTO 220 
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Veja como a logica e direta, mesmo testando erros de digitagao. Qualquer digitagao dife- 
rente da permitida e rejeitada, e o caractere de controle direcional e rejeitado se mover a janela 
alem dos limites do arranjo. 


PROGRAMANDO IMPRESSORAS 

0 Apple II trata a impressora como substituta da tela de vi'deo. Para criar sai'da por impressora, 
devem-se dar declaragoes de programa que desviem a sai'da do vfdeo para a impressora. Os coman- 
dos devem trazer de volta a sai'da para o vi'deo, quando for terminada a impressao. Isso e feito 
usando a declaragao PR#. 

As impressoras se ligam ao computador por meio de uma interface serial ou paralela, depen- 
dendo do modelo usado. 

Normalmente o cartao de interface serial e conectado ao slot 1 do Apple II enquanto a inter¬ 
face paralela 6 colocada no slot 2. Mas isso e mais convengao do que necessidade. De fato, os 
cartoes de interface serial e paralela podem ser inseridos em qualquer um dos slots (exceto o 
slot 0). 


Saindo Texto para a Impressora 

Lembre-se que o PR#e considerado uma declaragao do DOS sempre que o DOS esta presente. Isso 
significa que ele deve ser impresso com um caractere pre-fixado, o Ctrl-D (codigo 4 em ASCII). 
0 programa abaixo imprime duas linhas de texto numa impressora conectada no slot 1 do Apple II 
com o DOS presente: 

10 REM MANDA DUAS LINHAS DE TEXTO PARA IMPRESSORA 
20 REM OR IA 0 CARACTERE CTRL.-D 
30 D$ * "" 

AO REM SELECTA 0 PORT SERIAL DE E/S 
50 PRINT D$5"PR HI" 

60 PRINT "0 APPLE ESCREUE PARA A TELA OU IMPRESSORA" 

70 PRINT "E EM CADA CASO SAT. UM BYTE POR UEZ" 

80 REM DESCONECTA A IMPRESSORA 
90 PRINT D$;"PR#CT 

100 END 

A declaragao na linha 30 cria o caractere de controle que converte o comando PR#na declaragao 
BASIC. A declaragao PR# aparece nas linhas 50 e 90. A declaragao na linha 50 transfere a sai'da 
da tela para a impressora, enquanto que a da linha 90 transfere de volta para a tela. A declaragao 
PRINT das linhas 60 e 70 manda duas linhas de texto para a impressora. Aqui esta o resultado 
obtido quando se roda o programa: 


0 APPLE ESCREUE- PARA A TELA 0U IMPRESSORA 
E EM CADA CASO SAT. UM BYTE POR UEZ 
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Aqui esta o mesmo programa para o Apple II sem o DOS: 


10 

REM SAIDA DE DUAS LINHAS DE TEXTO PARA 

IMPRESSORA 

40 

REM SEL.ECIONA 0 PORT DE E/S 


50 

PR. INI- 

"PRH-1" 


60 

PRINT 

"0 APPLE ESCREUE PARA A TELA OU 

IMPRESSORA" 

70 

PRINT 

"E EM CADA CABO SAI UM BYTE POR 

UEZ" 

80 

REM DE 

SELECTA A IMPRESSORA 


90 

PRINT 

"PR 140" 


100 

END 




Impressoras Programaveis 

Muitas impressoras permitem que a safda seja formatada sob controle do programa. Inserindo os 
caracteres de controle apropriados no texto que sai pela impressora, pode-se ajustar a largura de 
linha, o conjunto de caracteres, o tamanho da pagina e uma grande variedade de outras carac- 
terfsticas. 

Muitas impressoras populares sao comumente usadas com o Apple II. Sob o ponto de vista 
de programagao, entretanto, o Apple II trata todas as impressoras de forma identica. Por exemplo, 
suponha a impressora da Texas Instruments modelo 810 conectada a um computador Apple II 
por meio de uma interface serial conectada ao slot 1. 0 manual da Texas diz que podemos deter- 
minar o tamanho da pagina para seis linhas em cada uma com a seguinte seqiiencia de caracteres: 


Esc-2 Ctrl-1 Return 



Caractere de termino 

Tamanho de pagina: seis linhas de texto 
mais tres de cabegalho 

Este caractere diz que se segue a definigao 
de formato de pagina 


Alem disso, pode-se forpar a impressora a pular para o irn'cio da pagina seguinte (esta operacao e 
conhecida em computapao como line-feed) com a seguinte sequencia de caracteres: 


Ctrl-R Return 



Caractere de termino 

Este caractere diz a impressora para pular 
para a pagina seguinte 


Modificando o nosso exemplo anterior, a listagem para o Applesoft abaixo faz a impressao 
das mesmas duas linhas 15 vezes, em blocos de 8 linhas. Este programa deve ser usado com a pre¬ 
sent do DOS. 
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10 REM SAIDA DE TEXTO PARA A IMPRESSORA 

11 REM LJSANDO 6 LINHAS POR PAGINA E 5 PAGINAS 

20 REM CRIAR 0 CARACTERE CTRL-D 

30 D$ = "" 

40 REM SEL.ECIONA 0 PORT DE E/S SERIAL 

50 PRINT D*;~PRt41" 

51 REM DETERMINA 6 LINHAS POR PAGINA 

52 PRINT CHR$ <27>?"2"? CHR* <6> 

53 PRINT CHR* <12)5s REM SAI FORM FEED PARA POSICIONAR 

PARA 0 INICIO DA IMPRESSAO 

54 FOR I « 1 TO 15 

60 PRINT "0 APPLE ESCREVE PARA A TELA OU IMPRESSORA" 

70 PRINT "E EM CADA CASO SAI IJM BYTE POR VEZ" 

75 NEXT I 

80 REM DESCONECTA A IMPRESSORA 

90 PRINT D*?"PR#0" 

100 END 

No programa acima, a declaragao da linha 52 seleciona seis linhas por pagina. A fungao 
CHR$(27) representa o caractere ESC. 0 CHR$(9) define a pagina como sendo seis linhas mais 
tres de separagao entre o fim de uma pagina e o infcio da outra. Os pontos-e-vfrgulas concatenam 
todos os caracteres de forma a dar a sequencia requerida pela impressora. 

A declaragao da linha 53 executa o salto para o infcio de uma pagina. 0 CHR$(12) executa 
a fungao form feed. Urn ponto-e-vfrgula segue o caractere de form feed porque sem ele a declara¬ 
gao PRINT produziria urn carriage return, resultando numa linha em branco. Sem o ponto-e-vfr¬ 
gula, entretanto, a primeira pagina teria uma linha em branco e cinco linhas impressas, enquanto 
as demais teriam seis linhas impressas por pagina. 

Qualquer outra impressora programavel pode ser conduzida transferindo-se para ela os codi- 
gos de controle da mesma forma. 

Este programa nao opera em Integer BASIC porque usa a fungao CHR$. No entanto, pode-se 
gerar qualquer caractere ou sequencia de caracteres acionando combinagoes de teclas. Pode-se 
trocar o CHR$ por um par de aspas fechando um caractere que nao e impresso. Por exemplo, o 
valor gerado pela digitagao (com tres teclas) do "Esc” e o mesmo que CHR$(27). Veja o Apendice 
I onde hS uma listagem completa de tais equivalences. 


Imprimindo Listagens de Programa 

Digitando-se o comando LIST no teclado, qualquer programa do Apple II pode ser listado na tela 
do vfdeo. Para imprimir a listagem, entretanto, deve-se dar os comandos PR# apropriados antes e 
depois de dar o comando LIST. Assumindo que a impressora esta conectada a uma interface no 
slot 1, aqui estao os passos necessarios: 

1. Certifiqqe-se que o programa a ser listado esta na memoria do Apple II. 

2. Com o cursor numa linha em branco, selecione a impressora com o comando PR#1. O 


programaqAo basic avanqada 


149 


cursor voltara para o primeiro caractere da linha corrente porem sem passar para a linha 
de baixo. 

3. Digite LIST. Este comando nao aparecerS na tela, porem sera colocado na impressora 
onde o programa tambem devera aparecer listado depois. 

4. Quando o programa inteiro estiver listado, devolva a impressao para o vfdeo com a digi- 
tagao de PR#0. Este comando nao aparecera no vfdeo; devera aparecer na impressora. 


GUARDANDO DADOS EM CASSETTE 


Aprendemos no ultimocapftulo como guardar e recuperar programas guardados numa fita cassette. 

No Applesoft, pode-se tambem guardar valores numericos ou arranjos inteiros na fita. 

A instrugao STORE guarda valores de arranjos e a instrugao RECALL os le de volta. Ne- 
nhum dos dois controla os movimentos do gravador, nem apresenta diretivas dizendo ao operador 
quando operar os botoes do gravador cassette. O programa abaixo demonstra o uso do STORE e 
RECALL. Ele atribui valores a urn arranjo numerico, guarda o arranjo numa fita cassette, coloca 
os valores do arranjo em zero e, finalmente, rele os valores da fita. Os valores do arranjo sao mos- 
tradosem pontos-chave para documentar as mudangas que vao ocorrendo no decorrer do programa. 

10 REM ESTE PROGRAMA DEMONSTRA 0 STORE E 0 RECALL 
20 RE M # * *•**•*#* tt * *:• * * ¥ ¥ * * * * # ¥ * ¥ ¥¥¥¥ tt ¥ * ¥ ¥« ¥: ¥: ¥ ¥ ¥ ¥¥¥¥¥¥ ¥ ¥ ¥ ¥ 
30 DIM A(10) 

40 HOME 

50 PRINT TAB < 4)""GUARDOU ? TAB (13)""LIMPOU"’ TAB (22); 
"RELEU" 

60 REM INICIALIZA VALORES DO ARRANJO 
70 FOR I « 1 TO 10: A<I) ^ Is NEXT I 
80 T - 8: GOSUB 1000: REM MOSTRA VALORES A GUARDAR 
90 OfAB 20: MTAB 1 

100 PR INT "COLOQUE! 0 CASSETTE NO GRAVADOR «REBOB INE" 

110 PRINT "ACIONE OS BOTOES y RECORD y E r PLAY r " 

120 INPUT "E DIGITE r VAI y ";C$ 

130 IF Ct < > "VAI" GOTO 90 

140 STORE A 

160 CLEAR: REM COLOCA VALORES DO ARRANJO A ZERO 

170 VTAB 2: T « 18s GOSUB 1000: REM MOSTRA ARRANJO LIMPO 

180 VTAB 20: HTAB 1 

190 GOSUB 1100: REM LIMPA ULTIMAS INSTRUCOES 
200 VTAB 20: HTAB • 1 

210 PRINT "REBOB INE A FITA. ACIONE y PLAY y /" 

220 INPUT "E DIGITE y VAI y "?C$ 

230 IF C$ < > "VAI" GOTO 200 
240 RECALL A 
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260 UTAB 2: T =: 28s GOSUB 1000s REM MOSTRA OAL.ORES LIDOS 

270 GOSUB 1100s REM LIMPA ULTIMAS INSTRUCOES 

280 UTAB 203 HTAB 1 

290 PRINT "AC I ONE! 'STOP'." 

300 END 

990 REM ++++ + + -» • + + ++++ SUBROTINA 1000 +++++ + ++++++ + + +++ 
1000 FOR I * 1 TO 10: HTAB Ts PRINT A<I): NEXT Is RETURN 

1090 REM +++++++++++++ SUBROTINA 1100 + + + +++++■*•++ + + + + + + 
1100 FOR I a 1 TO 1198 PRINT.? s NEXT Is RETURN 

Pode-se guardar um arranjo sob o nome de uma variavel e chama-lo usando outro nome. 
Mas, de forma geral, a dimensao de um arranjo gravado deve ser a mesma do arranjo usado na 
leitura. Existem alguns casos excepcionais mais complicados que sao vistos no Capi'tulo 8. A menos 
que haja intengaode obter algum efeito especial, use o RECALL para os dados gravados no cassette 
com um arranjo das mesmas dimensoes daquele utilizado no STORE. 


OTIMIZAQAO de programas 


Tradicionalmente, o programa otimo e aquele que, para uma dada tarefa, opera mais rapidamente 
e usa menos memoria. Claramente estes dois objetivos devem ser balanceados de forma que o pro¬ 
grama resultante seja eficiente, fcicil de escrever, f2cil de usar e facil de modificar. Havera mais 
beneffcios ao longo do tempo em se direcionar a programagao sobre esses aspectos do que ficar 
praticando malabarismos para otimizar a velocidade e a utilizagao da memoria. Em tempo, se ja 
houver o conhecimento de como otimizar a velocidade de programas e a utilizagao da memoria, 
deve-se inicialmente escrever programas que sejam eficientes e que nao precisem ajustes finos de- 
pois de estarem rodando. Neste espfrito, apresentamos algumas formas de escrever programas que 
sao mais r£pidas e usam menos memoria. 

Algumas das tecnicas para fazer um programa rodar mais rapido fazem-no consumir mais 
espago, enquanto outras tecnicas que economizam espago em memoria, aumentam o tempo de 
execugao. Deve-se decidir o que e mais importante em cada programa individualmente. 


PROGRAMAS RAPIDOS 

Evite usar constantes (ou seja, 0, 100, "Y", "ENTRE"). No lugar delas, associe primeiramente em 
seu programa o valor da constante na variavel. Use entao a variSvel onde se usaria a constante. 
Isso e especialmente importante quando se usam constantes inteiras repetidamente em expressoes 
reais. Leva muito tempo para se converter uma constante para um valor real porque e preciso 
varrer a tabela de variaveis. E quando tal conversao acontece dentro de um loop FOR-NEXT, uma 
sub-rotina muito usada ou uma fungao definida pelo usu2rio, as diferengas se tornam muito mais 
significativas. Esta tecnica tern como beneffcio adicional o fato de tornar o programa facil de ser 
alterado. Se for necessaria sempre a troca de uma constante, sera mais facil modificar aquela 
dentro de uma declaragao de atribuigao, do que procurar e trocar cada ocorrencia da constante 
ao longo do programa. 
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Use aquelas variaveis mais frequentemente usadas no programa tao proximas da execugao 
quanto for possfvel. A alocapao de variaveis se d3 de forma que a primeira variavel que chega e 
alocada primeiro, e na medida em que elas chegam, vao sendo alocadas em sequencia. 0 BASIC 
encontra uma variavel no infcio da lista mais rapidamente que uma no fim dela. 

Quando o BASIC encontra uma declarapao de salto para uma outra linha, ele comepa a 
procurar o enderepo a partir do infcio do programa e vai pesquisando ate encontrS-lo. Claramente, 
quanto menor for o numero da linha em relapao as demais linhas do programa, tanto mais rapido o 
BASIC executa a instrupao. Por isso, em seus programas, de enderepos baixos para as sub-rotinas 
de uso mais frequente. 

No Applesoft, nao inclua fndices na declarapao NEXT. Dessa forma, evita-se a necessidade 
do programa conferir se o fndice foi especificado corretamente ou nao. 


PROGRAMAS COMPACTOS 

Use sub-rotinas para evitar duplicapao de programa para a mesma logica. Essa tambem sera uma 
forma de aumentar a legibilidade, eficiencia e facilidade de alteracao de seu programa. 

Use os elementos de fndice 0 dos arranjos (ex. X(0), B(0)). 

Existem menos caracteres num nome de variavel pequena que numa constante de vSrios 
dfgitos. Por isso atribua nomes de variaveis a constantes e use esses nomes ao inves de especificar os 
valores reais. 

Ponha mais de uma declarapao numa mesma linha. Cada nova linha de programa usa cinco 
bytes extra para seu numero. Observe, entretanto, que as linhas de programa compostas de mais de 
uma declarapao sao mais dif fceis de editar e tambem de ler e entender. Conceber como o programa 
deve operar pela primeira vez e dif fcil, pior ainda e ter que fazer isso muitas vezes, mais tarde. 

Use declarapoes REM com criterio; abrevie os comentSrios. Mas seja cuidadoso; quanto me¬ 
nos comentirios seu programa tiver, mais dif fcil sera destrincha-lo mais tarde. 

Seja economico com o uso de variaveis. Cada uma delas requer uma certa quantidade de me¬ 
moria, mesmo se for usada apenas uma vez. Crie um sistema de criapao de nomes de variaveis, que 
tenha algumas do tipo rascunho, que podem ser usadas dentro de loops FOR-NEXT, cSIculos 
intermediaries, e coisas do tipo. Porem nao se exceda; o programa ficara mais facil de ser enten- 
dido se os nomes forem escolhidos com criterio e significado. Crie padroes de identificacao para 
cada variavel (por exemplo, NC$ para nome do cliente) e para tipos de variaveis (por exemplo, 
todas as variaveis de rascunho iniciam com a letra X). 

Use declarapao INPUT e arquivos de dados (se tiver um disco, veja o Capftulo 5) em vez de 
declarapoes de atribuipao e declarapao DATA. 

No Applesoft, use arranjos inteiros no lugar de arranjos reais. Cada valor no arranjo inteiro 
usa dois bytes de memoria, enquanto que cada valor no arranjo real usa cinco bytes. Use a funpao 
FRE periodicamente no seu programa para limpar areas de armazenamento decorddes na memoria. 


DEPURAQAO 


Um programa novo nunca funciona segundo se espera que ele funcione. Mesmo se nao houver 
erros de sintaxe BASIC, e comum o aparecimento de erros na logica usada. Em “computes" 
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chama-se a qualquer urn dos dois tipos de erro de bug. 0 processo para deteccao e correcao e 
conhecido como debugging. Existem varias formas de se depurar (ou fazer o debugging) do pro- 
grama. 

Existe uma forma de conduta sempre recomendavel: tome seu tempo, planeje o que fazer, 
faga-o corretamente na primeira vez. Nao se sente em frente ao teclado com um mero esbogo do 
que deve ser feito, entrando com o programa “na raca". Se Ihe faltar experiencia em programacao, 
complemente esta literatura com uma de diretivas do BASIC listadas no Apendice K para ter algu- 
mas nopoes prSticas de como se deve programar bem. 

Se seu programa foi escrito e nao esta operando como foi imaginado que fizesse, existem 
algumas declarapoes do BASIC que podem ser usadas para ajudar na depurapao. 


A Declarapao PRINT 

Surpreendentemente, a velha e conhecida declarapao PRINT e uma excelente ferramenta de depu- 
ragao. Pode-se acrescentar algumas declarapoes PRINT de forma temporaria em pontos estrate- 
gicos do programa para mostrar mensagens que informem se o programa atingiu determinados 
pontos sem falha, e informar valores intermediaries de variaveis. Essa e uma forma de acompanhar 
o fluxo da execugao do programa e verificar os resultados de calculos de valores intermediaries. 


A Declarapao TRACE 

A declarapao TRACE, como seu nome indica, traca o fluxo da execugao do programa mostrando 
o numero da linha de cada declarapao que executa. Para ver como ela funciona, digite o programa 
abaixo, digitando em seguida o comando TRACE seguido por RUN. 

100 PRINT "ENTRE UM NUMERO DE 1 A 5 <6 PARA FIN)"! 
110 INPUT N 

120 IF N « 1 THEN PRINT "ONE" 

130 IF N == 2 THEN PRINT "TWO" 

140 IE N ~ 3 THEN PRINT "THREE" 

100 IF N « 4 THEN PRINT "FOUR" 

160 IF N = 5 THEN PRINT "FIUE" 

170 IF N > 5 THEN GOTO 100 
180 FOR I = 1 TO N 

190 PRINT REM IMPRIME N ASTER ISCOS 

200 NEXT I 

210 CALL -936s REM LIMPA A TELA 
220 GOTO 100 


Para cancelar o modo TRACE e retornar ao normal, execute o comando NO TRACE. 


A Declaragao DSP 

Existe outra declaragao de depura^ao util dispom'vel apenas no Integer BASIC: a declaracao 
DSP. Aqui esta um exemplo: 
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>10 DSP CONTA 

Uma vez que essa declaracao DSP particular tenha sido executada, o Apple II informara cada vez 
que o valor da variavel CONTA mudar, e em que linha ocorreu tal mudanca. Como o comando 
RUN desliga as declaracoes DSP dadas previamente, deve*se dar GOTO para iniciar o programa, 
ou colocar o DSP como declaracao dentro do programa. 

Para se desativar o modo DSP para uma variavel deve-se dar a declaragao NODSP. Aqui 
esta urn exemplo: 


>300 NODSP NOME* 


Uma vez executada esta declaracao, o Apple II nao mais notifica cada alteracao da variavel NOME$. 

Tente adicionar as linhas seguintes no exemplo usado para o TRACE para observar o efeito 
do DSP. Embora se possa usar ambos simultaneamente, tente rodar o exemplo sem o TRACE para 
ver mais claramente os efeitos do DSP. 

10 OSPN 
20 DSP I 

100 PRINT "ENTRE UH NUMERO DE 1 A 5 <6 PARA FIM>"! 
110 INPUT N 

120 IF H = 1 THEN PRINT "ONE" 

130 IF N * 2 THEN PRINT "TWO" 

140 IF N =* 3 THEN PRINT "THREE" 

150 IF N - 4 THEM PRINT "FOUR" 

160 IF N = 5 THEN PRINT "FIME" 

170 IF N > 5 THEN GOTO 100 

180 FOR I a i TO N 

1 9 0 P RIN T " # " 5 : R E M IM P R IM E N A 8 T E RIS C 0 S 

200 NEXT I 

215 NODSP 

210 CALL -936s REM LIMPA A TELA 
220 GOTO 100 


RESTRICOES NO MODO IMEDIATO E PROGRAMADO 


Pode-se usar a maioria das declaragoes BASIC em ambos os modos. Porem ha declaragoes que sao 
legais apenas em modo programado, e outras apenas em modo imediato. A Tabela 4.2 lista as 
declaracoes restritas para o Integer BASIC. A Tabela 4.3 lista as declarapoes restritas para o Apple¬ 
soft. 
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TABELA 4.2. Declaragoes Restritas a Modo Programado ou 
Imediato no Integer BASIC. 


Modo Programado 

Modo Imediato 

END 

AUTO 

FOR 

CLR 

GOSUB 

CON 

INPUT 

DEL 

NEXT 

HIMEM: 

RETURN 

LOAD 


LOMEM: 


MAN 


NEW 


RUN 


SAVE 


TABELA 4.3. Declarapoes Restritas a Modo Programado no Applesoft. 


Apenas em Modo Programado 

DATA 
DEF FN 
GET 
INPUT 

ON ERR GOTO 
RESUME 







5 

O Disk II 


0 drive de disco e um dos mais importantes componentes de um sistema de computagao. Ele 
permite acesso instantaneo a qualquer item de uma longa lista de informagoes. 0 disco do Apple II 
pode guardar mais de 143.000 caracteres de dados num unico disquette. Isso e quase tres vezes o 
que se pode guardar em 48K de RAM e, quando o computador e desligado, toda a informagao 
presente no disco permanece intacta. 


SOBRE DISCOS 

Os discos guardam informagao magneticamente, da mesma forma que uma fita de gravador. A 
maior diferenga e que o disco e redondo e roda como um disco de musica. Dentro do drive existe 
uma cabeca que le e grava informagao. 0 computador pode mover a cabega para qualquer parte da 
superf fcie do disco. Essa habilidade permite o acesso a/eatorio. Por isso, pode-se dizer que o disco 
e um dispositivo de armazenamento de acesso a/eatorio. Um programa especial, chamado Sistema 
Operacional do Disco (Disk Operating System ou simplesmente DOS), controla toda a operagao do 
disco. Existem varios tipos diferentes de discos. 


Discos Rfgidos 

Os discos rfgidos, ou duros, sao cobertos com uma substancia magnetica. Eles armazenam tipica- 
mente de 5 a 10 megabytes de dados (um megabyte e equivalente a um milhao de bytes). Muitos 
discos rfgidos sao removfveis; isto e, o disco e o drive podem-se separar, de forma que se pode 
trocar de disco. Discos rfgidos custam cerca de 150 dolares cada, os drives custam de 3 a 10 mil 
dolares. A Figura 5.1 mostra um sistema tfpico de disco rfgido. 
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FIGURA 5.1. Sistema Tfpico com Disco Ri'gido. (Cortesia de Cameo Electronics.) 


Discos Winchester 

Os drives de disco Winchester, mostrados na Figura 5.2, usam uma tecnologia especial que permite 
de seis a dez vezes mais dados em cada disco. Os discos Winchester sao extremamente susceptfveis 
a sujeira e po — mesmo fumaga de cigarros. E por terem a necessidade de permanecerem sempre 
limpos, sao selados dentro do drive e nao podem ser tocados. Um sistema de disco Winchester 
custa de 2.500 a 8.000 dolares. 


Disquettes 

Os disquettes sao o tipo mais popular de disco. Cada um deles consiste num disco de vinil circular 
fechado num envelope plastico. 0 envelope protege o disquette contra danos durante o manuseio 
normal. 0 disquette roda livre dentro do envelope. As aberturas do envelope possibilitam acesso da 
cabega a superf fcie do disco e fornecem uma area onde o drive pode prender e rodar o disquette. 
Ele nunca deve ser retirado de seu envelope. A Figura 5.3 mostra como e o disquette fora de seu 
envelope. 

Os disquettes, tambem conhecidos como floppy discs, sao comuns em dois tamanhos: 8 e 
5% de polegadas de diametro, ambos ilustrados na Figura 5.4. O Disk II do Apple usa disquettes 
de 5% de polegadas, que tambem sao chamados minidiscos ou minidisquettes. O Disk II pode 
guardar 143.360 bytes em cada disquette. 
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FIGURA 5.2. Drive de Disco Winchester. (Cortesia de Corvus Systems, Inc.) 



FIGURA 5.3. Um Disquette Sem a Protepao do Envelope. 
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FIGURA 5.4. Disquettes de 8 e 5 1/4 de Polegadas. 


COMO OS DADOS SAO GUARDADOS NOS DISCOS 

E interessante familiarizar-se com as varias facetas do processo de armazenamento em disco. A 
informapao armazenada num disco e o resultado de varias acoes coordenadas. 


Trilhas 

Para achar um byte em particular, dentro de urn universo de 143.360 bytes de cada disquette, 
o Apple DOS divide o disco em 35 trilhas, numeradas de 0 a 34. Essas trilhas sao similares aquelas 
dos discos de musica, a excepao de que nao podem ser vistas e uma trilha nao se conecta com a 



FIGURA 5.5. Trilhas do Disquette. 
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seguinte, mas sim consigo mesma; isto e, sao cfrculos concentricos, um dentro do outro, como 
aparece na Figura 5.5. 


Setores 

Num passo seguinte para achar um determinado byte, o DOS divide cada trilha em 16 setores, 
como mostra a Figura 5.6. Cada setor guarda exatamente 256 bytes. Informado sobre a trilha e o 
setor de um determinado byte, o DOS tera apenas 256 bytes para procurar. Agora, acessar um byte 
em particular, ou uma s6rie deles, e quase instantaneo. E usado todo o poder do drive de disco. 



FIGURA 5.6. Superfi'cie Gravada de um Disquette. 
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LOCALIZANDO TRILHAS E SETORES 

Achar a trilha de um disquette e fScil: o drive move a cabega ate o ponto daquele disquette onde 
esta localizada a trilha, da mesma forma que se faria para localizar um disco dentro de um album. 

Achar o setor e um pouco mais diffcil. Existem dois metodos usados para essa tarefa. Ambos 
usam um buraco de fndice. Em muitos disquettes esse buraco e localizado perto do buraco central 
no centro do envelope. A medida que o disquette gira, o buraco (ou buracos) de fndice passa(m) 
pelo buraco correspondente do envelope. Uma fonte de luz dentro do drive passa luz para um 
sensor sempre que os buracos estao alinhados. 0 computador sente os pulsos de luz e os setores 
sao localizados tendo como base essa informagao. 

Existem dois metodos usados para achar os setores do disquette, chamados setorizacao por 
hardware e setorizacao por software. 


Setorizagao por Hardware 

Os disquettes deste tipo tern vSrios buracos, como mostrado na Figura 5.7. Cada buraco indica a 
localizagao de um setor. Um buraco extra marca o local do primeiro setor. O computador acha os 
setores contando os buracos que vem depois do primeiro setor. 0 Disk II nao usa este metodo. 


Setorizagao por Software 

Os disquettes deste tipo tern apenas um buraco de fndice, como mostra a Figura 5.8. Ele marca o 
primeiro setor. A localizagao dos demais setores e feita baseada no tempo de rotagao do floppy 
disc. 

O Apple II ignora todos os buracos de tempo. Sua temporizagao e totalmente eletronica, e 
nao f fsica. Isso quer dizer que se pode usar tanto disquettes setorizados por hardware quanto por 
software com o Disk II. 



FIGURA 5.7. Disquette Setorizado por Hardware. 
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PROTEgAO CONTRA ESCRITA 

Existe tambem um recorte do lado do envelope. Ele e usado para permitir ou evitar que seja gra- 
vada informagao no disquette. Em disquettes de 8 polegadas este recorte e para proteger contra 
escrita, porque o computador nao pode gravar num disquette se ele tiver o recorte do lado do 
envelope. Em disquettes de 5 % polegadas o recorte permite gravagao porque o computador nao 
pode gravar num disquette, a menos que o recorte exista. Alguns disquettes, como os chamados 
"System Master Diskette", vendidos com o Apple II, sao permanentemente protegidos. Eles 
vem sem o recorte. Os disquettes de 5% polegadas podem ficar protegidos contra gravagao, 
cobrindo-se o recorte com um pedago de fita adesiva. A Figura 5.9 mostra esse processo. 



FIGURA 5.9. Protegendo um Disquette de 51/4" contra Gravagao. 
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O SISTEMA OPERACIONAL EM DISCO 


Todas as operates relacionadas com disco sao controladas por um programa especial chamado 
Disk Operating System, ou DOS. 0 BASIC transmite pedidos ao DOS para qualquer operagao onde 
o disco esteja envolvido. 0 DOS devolve o resultado ao BASIC. 


VERSOES DO DOS 

Existem atualmente varias versoes do DOS. 0 DOS 3.3 e a mais recente. Este capftulo a descreve. 
A principal diferenga entre o DOS 3.3 e o DOS 3.2.1, a ultima mais recente, e o numero de setores: 
no DOS eram 13 por trilha e no DOS 3.3 sao 16. A Apple Computer Inc. tern um programa espe¬ 
cial que converte discos do DOS 3.2.1 para DOS 3.3. 


INICIALIZANDO DISCOS 

Antes que o Apple II possa usar um disquette, ele deve ser inicializado. Inicializar um disquette e 
zerar todos os setores dele e colocar uma copia do DOS nas trilhas 0, 1 e 2. As instrugoes de inicia- 
lizagao do Disk II serao vistas mais tarde. 


ARQUIVOS EM DISCO 

A informagao e guardada nos disquettes, sob a forma de arquivos. Um arquivo pode ter qualquer 
tamanho desde que caiba num disquette. Todo arquivo tern um nome. Um arquivo pode guardar 
informagao do tipo texto, um programa ou mesmo uma imagem de vfdeo grafico do Apple II. 
Os varios tipos de arquivo serao vistos em detalhes mais tarde. 


DIRETORIO DO DISQUETTE 

0 nome de todo arquivo e guardado no diretorio do disquette. 0 diretorio esta localizado na trilha 
17. A primeira entrada do diretorio e no setor 15. A ultima entrada e no setor 1. 0 diretorio tern 
espago suficiente para guardar at6 104 arquivos. 

Junto com o nome do arquivo e guardado tambem um codigo indicando que tipo de dado 
ele contem, o numero de setores que ocupa e a localizagao do setor que contem a lista de trilhas/ 
setores do arquivo. 


LISTA DE TRILHAS/SETORES 

A lista de trilhas/setores contem pares de bytes que especificam os enderegos das trilhas e setores 
usados num arquivo. Cada par de bytes e chamado de link. 0 primeiro link numa lista de trilha/ 
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setor fornece o enderego do proximo setor usado pela lista. A lista pode ocupar tantos setores 
quanto for necessario. 0 segundo link e o enderego do primeiro setor usado pelo arquivo propria- 
mente dito, o terceiro link enderepa o proximo setor usado pelo arquivo e assim por diante. Um 
link com zeros marca o fim da lista. 


Sobre o Processo de Armazenamento em Disco 

0 DOS controla o fluxo de todos os dados de e para o disquette. Quando se grava um arquivo, 
varias coisas acontecem: 

1. 0 DOS procura o diretorio do disquette para achar o nome do arquivo. (0 nome dado ao 
programa o identifica, como veremos mais tarde.) 

2. Se o nome for achado, o DOS le 256 bytes do setor apropriado e os guarda numa area de 
memoria chamada buffer. Se o nome nao e encontrado, ou se tal setor daquele arquivo 
jamais foi gravado, o DOS enche o buffer com zeros. 

3. Ate 256 bytes de dados gravados para o arquivo sao copiados da memoria para o buffer. 
Se forem copiados menos de 256 bytes, ficam os dados anteriores. 

4. Se, e somente se, forem escritos 256 bytes no buffer, o seu conteudo e gravado de volta 
no setor apropriado do disquette. 

5. Este processo (passos 3 e 4) e repetido ate que todos os dados gravados para o arquivo 
tenham sido copiados para o buffer e guardados no disquette. 

6. Apos a gravagao de todos os dados no disquette, o DOS atualiza a lista de trilha/setor e 
o diretorio. 

Note que a menos que o numero de bytes que se grava seja divisfvel por 256, o ultimo bloco 
de bytes nao cabera no buffer, e os passos 4 a 6 nunca acontecerao. Por isso, o comando CLOSE 
do Disk II forca os dados do buffer a serem gravados no arquivo, apos o que sao atualizados a lista 
de trilha/setor e o diretorio. Este processo e chamado fechamento do arquivo. Falhas no processo 
de fechamento de arquivos apos a colocapao de dados neles podem resultar em perda de dados. 
Feche sempre o arquivo apos usa-lo. 0 comando CLOSE sera discutido em detalhes mais tarde. 


PANES EM DISCO (CRASH) 

Um dos piores erros que podem ocorrer e a chamada "pane" no disco. Existem dois tipos de 
panes: de hardware e de software. 

Uma pane de hardware ocorre quando a superfi'cie do disco e danificada, ou tern um defeito 
f fsico, como um rasgo ou uma mancha de sujeira. Ela pode causar danos a cabeca de leitura e gra¬ 
vagao dentro do drive. A cabeca danificada pode, por sua vez, danificar mais discos. Por esta razao, 
sempre manipule os discos com muito cuidado. 

Uma pane de software ocorre quando a trilha de diretorio e alterada com dados incorretos. 
0 que ocorre com mais frequencia e o nao fechamento de um arquivo apos a gravacao de algo nele, 
sendo que se coloca outro disco em seu lugar, e os arquivos do disco original sao fechados nesse 
outro disco. Para apreciar o estrago que isso causa, faca-o por conta propria. 
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CARREGAMENTO DO SISTEMA OPERACIONAL DISK II 


Para que o Apple II reconhepa qualquer comando de disco, o programa especial DOS (Sistema 
Operacional do Disco) deve estar na memoria. Se houvesse muito tempo disponfvel, poder-se-ia 
digit£-lo no teclado. Porem existe uma forma mais facil: e o que se chama de fazer oboot do sis¬ 
tema; este processo consiste em ler uma copia do DOS do disco e coloca-la na memoria. 


COMO CARREGAR O SISTEMA 

Existem vSrias formas diferentes de carregar o DOS, dependendo da configurapao do computador 
usada e da linguagem usada para iniciar o carregamento. Todo o metodo assume que o disco esta 
colocado no DRIVE 1 e o controlador de disco est3 no slot 6. 

Coloque o "System Master Diskette" no drive e feche a porta. O passo seguinte depende do 
sistema usado. No fim do processo, a tela de vi'deo se parecerS com uma das formas mostradas na 
Figura 2.5. 

Autostart 

0 autostart e a forma mais fScil de carregar o DOS. Como o nome diz, o carregamento e automa¬ 
tic©. Para isso, o computador deve ter o Autostart Monitor. Pode-se saber se o computador tern o 
Autostart Monitor instalado, ligando-o com o Disk II conectado. Se a lampada IN USE da cabine 
do disco acender e o disco rodar e gerar estalidos, ele tera o Autostart Monitor instalado. 

Para carregar o sistema com o Autostart Monitor, simplesmente ligue a chave do Apple II. 

Carregamento a Partir do Monitor 

Quando o caractere de apresentapao do monitor ( * ) aparece na tela, o Monitor de Linguagem 
Assembler do Apple II estard esperando comandos. Existem virias formas de carregar o DOS a 
partir do Monitor. 


Salto do Monitor para o "BOOT" 

Digite a letra C, seguida pelo numero do slot do drive que deve ser carregado (normalmente 6), 
dois zeros e a letra G. 0 comando inteiro e mostrado abaixo: 

*C600G 

C600 e o enderepo do programa na memoria que carrega a partir do drive do slot numero 6. G e 
o comando que transfere o controle para o programa. Acione RETURN em seguida. A lampada 
do drive deve acender e o drive emitirci rui'dos. 


Boot do Monitor com CTRL-K e CTRL-P 

Outros comandos no Monitor, que podem ser usados para carregar o DOS sao CTRL-K e CTRL-P. 
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Para usar estes comandos, digite o numero do slot (normalmente 6) seguido por Ctrl-K ou 
CTRL-P. Tanto um quanto outro nao aparecerao na tela. 

Depois de digitar estes comandos acione a tecla RETURN. 


Carregando a Partir do Integer BASIC ou Applesoft 

Os mesmos comandos de carregamento sao reconhecidos tanto pelo Integer BASIC quanto pelo 
Applesoft. 


Carregando a Partir do BASIC Usando os Comandos PR# e IN# 

Apos o aparecimento do caractere de apresentapao do BASIC (> para o Integer BASIC e ] para 
o Applesoft), digite as palavras PR ou IN, o sinal de numero (#), e finalmente o numero do slot 
onde esta o disco para o boot. 0 comando inteiro 6 como um dos que seguem: 

PR.H6 

ou 

IN#6 

Agora digite a tecla Return. 


Carregando a Partir do Apple Language System 

Se este sistema estiver instalado no Apple II, os processos de carregamento acima nao se aplicam. 
Ele usa dois discos para carregar o DOS versao 3.2.1, 3.2 e anteriores. Porem o DOS 3.3 nao 
opera como foi descrito acima. 

Para carregar o DOS 3.2.1, 3.2 e anteriores usando o Language System, coloque o disquette 
chamado “BASICS: Integer and Applesoft II" (fornecido com o Language System) no lugar do 
“System Master Diskette" descrito acima, procedendo entao de uma das formas descritas antes 
(autostart, PR#6 etc.). Apos o carregamento correto, a tela mostrar^: 

INSERT BASIC DISK AND PRESS RETURN 

Isso nao e bem correto. Realmente o disquette que deve ser colocado e o DOS (o “System Master 
Disquette" funciona, ou se pode usar qualquer outro que tenha sido inicializado). Apos a colo- 
capao do segundo disquette e o acionamento da tecla RETURN, o carregamento sera executado 
normalmente e a tela mostrara uma das formas da Figura 2.5. 


INICIANDO COMANDOS DO DISCO 


0 Sistema Operacional do Disco do Apple II interpreta e executa comandos do disco. Muitos 
comandos permitem ou requerem parametros adicionais que definem mais especificamente a 
operapao a ser executada. Alguns comandos elementares sao descritos abaixo. 
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*1 

002 

HELLO 

*1 

053 

APPLE-TREK 

*1 

013 

ANIMALS 

*B 

009 

UPDATE 3.2.1 

*1 

014 

COPY 

*1 

009 

COLOR DEMO 

*1 

053 

PRICK OUT 

*1 

026 

SPACE WAR 

*T 

050 

THE INFINITE NO. OF MONKEYS 

*1 

051 

COLOR SKETCH 

*1 

053 

SUPERMATH 

*1 

026 

AF’PLEVISION 


017 

BIORHYTHM 

*1 

027 

PINBALL 


FIGURA 5.10. Catalogo de Disco Ti'pico. 


CATALOG 

0 comando CATALOG lista todos os nomes dos arquivos do diretorio do disquette para o dispo- 
sitivo de sai'da corrente, normalmente a tela. 

O CATALOG primeiro apresenta o numero de volume do disquette (Numero de volume 
serao discutidos mais adiante). 

Para cada arquivo do disquette, o CATALOG lista o tipo de dado no arquivo, se o arquivo 
esta travado ou nao, o numero de setores que sao ocupados pelo arquivo e seu nome. Urn CATA¬ 
LOG ti'pico esta mostrado na Figura 5.10. 


Tipos de Arquivos 

0 tipo de dado no arquivo e representado por uma letra que aparece na coluna mais a esquerda 
do catalogo. Os codigos usados sao listados na Tabela 5.1. 


TABELA 5.1. Codigo de Tipo de Arquivo em Disco. 


Codigo 

Significado 

A 

Programas em Applesoft 

B 

Arquivos em imagem binaria 

1 

Programas em Integer BASIC 

T 

Arquivos de texto 

R 

Binario relocavel 
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Arquivos Travados 

Nao se pode gravar ou apagar um arquivo travado. 0 catalogo indica o travamento precedendo 
o tipo do arquivo com um asterisco ( * ). Se aparece um espago em lugar do asterisco, o arquivo 
nao esta travado. Os arquivos travados sao estudados serao estudados mais tarde, neste capftulo. 


Numero de Setores 

0 numero de setores que o arquivo ocupa e mostrado como um numero de tres dfgitos. 0 menor 
arquivo (vazio) tern o comprimento de um setor. Se um arquivo tiver mais que 255 setores, este 
numero sera zerado e reiniciado, o que nao afeta o tamanho real do arquivo. 


Nomes de Arquivos 

0 Apple II requer que se referencie cada arquivo pelo seu nome. Aqui estao as regras que gover- 
nam os nomes que sao dados aos arquivos: 

1. Os nomes devem ter de 1 a 30 caracteres de comprimento. Caracteres em excesso sao 
desprezados. 

2. Devem comegar por uma letra. 

3. Qualquer caractere digitado no teclado pode fazer parte do nome do arquivo, com exce- 
<?ao de vi'rgulas. 

Pode-se usar caracteres que nao se imprimem (como aqueles criados com a tecla CTRL) como parte 
do nome de arquivo, porem eles nao serao mostrados na lista do catalogo. Isso e util quando se 
deseja que outros nao saibam o nome dos arquivos com que se esta trabalhando. (Nao se esquepa 
de que caracteres foram colocados em seu arquivo.) 


Usando o Comando CATALOG 

Para usar o comando CATALOG, digite-o simplesmente (apos o DOS ter sido carregado) como 
abaixo: 


CATALOG 

0 resultado deve se parecer com algo mostrado na Figura 5.10. 

Se o numero de linhas do CATALOG exceder a 20, o computador mostrara as primeiras 
21 linhas, esperando entao o acionamento de qualquer tecla (com excepao de RESET, CTRL e 
SHIFT); para mostrar as proximas 21. Essa pausa da tempo para que se leiam todos os nomes dos 
arquivos antes de qualquer um deles ser jogado para fora por excesso de nomes. 


LOAD 

0 comando LOAD le um arquivo de programa do disquette para a memoria. Deve-se especificar o 
nome do arquivo a ser carregado. Este exemplo carrega o programa chamado COLOR DEMOSOFT: 
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LOAD COLOR DEMOS OF" T 

Se o nome de arquivo especificado nao estiver no diretorio do disquette, aparece a mensagem 
FILE NOT FOUND. 

Se o arquivo esta no disquette, o DOS verifica o seu tipo de dado. Se nao for um arquivo de 
programa, aparece a mensagem FILE TYPE MISMATCH. 

Considerando que tudo esta certo, o LOAD zera o programa que esta presentemente na me¬ 
moria de leitura/escrita e copia o programa do arquivo para a memoria. Apos a volta do caractere 
de apresentagao pode-se listar, modificar ou rodar o novo programa carregado. 


A VERSAO EM DISCO DO COMANDO RUN 

Frequentemente apos dar-se o comando LOAD, da-se o comando RUN. Pode-se abreviar estes dois 
passos especificando o nome do arquivo com o comando RUN. 0 comando LOAD fica imph'cito, 
desde que o arquivo deve ser carregado antes que possa rodar. Aqui estao alguns exemplos: 

RUN PR0GRAMA2 
RUN COLOR DEMOSOFT 
RUN TESTE MEMORIA 


ESPECIFICANDO O NGMERO DO DRIVE 

Muitos comandos do DOS permitem especificagao do drive de disco. Sao usados dois parametros 
para especificar o drive de disquette: o parametro drive e o parametro slot. 

Pode-se conectar dois drives de disquette a um controlador. Para selecionar o drive, ponha 
uma vi'rgula e D1 ou D2 no comando de disquette, como segue: 

LOAD CIMA f D2 
RUN ESTUDOrDI 
CATALOG 7 D2 

Depois que se usa o drive especificado uma vez, os comandos subsequentes de disco serao 
processados sobre o mesmo drive, ate que se especifique outro. 0 drive usado tera sempre sido 
especificado pelo comando anterior mais recente. Se nao foi usado ainda nenhum drive, o sistema 
usa o drive 1. 


ESPECIFICAQAO DO SLOT 

Os cartoes de controle do Disk II sao conectados a slots dentro do Apple II. Existem oito slots 
dispom'veis, porem o de numero 0 nao pode ser usado para controladores do Disk II. Restam sete 
slots para controladores do Disk II. Como cada controlador pode suportar de um a dois drives, sera 
possfvel um mSximo de 14 drives ao Apple II. 

Se existirem mais de dois drives conectados, eles nao poderao ser chamados de D3 ou D4 etc. 
Em vez disso deve-se usar um outro parametro para especificar o controlador apropriado. Este 
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parametro e chamado slot e se usa para indicar em qual slot o controlador de disco que se deseja 
utilizar esta conectado. 

Para usar o parametro slot, coloca-se uma vi'rgula, a letra S e o numero do slot (1-7) dos 
comandos de disco, como a seguir: 

CATALOG >• 85 
LO AD TRILHOS ? 86 
RIJN LSTOQUL ? S3 

0 slot usado quando se carrega o DOS torna-se o corrente. Ele sera selecionado ate que outro 
seja especificado num parametro slot. 

Depois de usar o parametro slot uma vez, os comandos de disco subsequentes se valerao da- 
quele disquette selecionado no parametro ate que se especifique outro. 

Pode-se usar os parametros drive e slot conjuntamente, no mesmo comando. Especificando 
o numero do slot de 1 a 7, e o numero do drive entre 1 e 2, referencia-se qualquer drive do Disk II 
conectado ao sistema. Os parametros drive e slot podem aparecer em qualquer ordem. Os dois 
comandos seguintes sao equivalentes: 

CATALOG , 02 , 85 
CATALOG , 85 ,02 

Ambos os comandos produzirao o catalogo do disquette no drive numero 2 do controlador insta- 
lado no slot 5. 


Problemas com o Parametro Slot 

Se selecionarmos um slot onde nao haja um controlador conectado, o computador travara. Ele 
ficara esperando por um controlador que nao existe para coloca-lo em uso. Para voltar com o 
programa intacto, acione RESET. Se aparecer um dos caracteres do BASIC ( > ou ] ), tudo estara 
bem. Se aparecer o caractere do Monitor ( * ), digite 3D0G e a tecla RETURN. Se nao funcionar, 
o programa foi perdido porque o DOS devera ser recarregado. 


ESPECIFICAQAO DE VOLUME 

Volume e outro parametro que pode ser especificado com qualquer comando do DOS que permita 
especificacao de slot e drive, exceto CATALOG. 0 volume permite certificar-se que foi colocado 
um disquette correto no drive que foi selecionado. 

0 comando CATALOG ignora a referenda de volume. Quando ele lista o diretorio do dis¬ 
quette, o numero de volume do disco e o primeiro a ser listado. 

Para usar o parametro volume, ponha uma vi'rgula e a letra V seguida pelo numero de volu¬ 
me, como segue: 

LOAD TOTAL x VI91 

Se o numero do volume especificado nao e o mesmo atribufdo ao disquette quando ele foi 
inicializado, o DOS devolve a mensagem VOLUME MISMATCH. 
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0 numero de volume deve estar entre 1 e 254. Se nao for especificado, ou se for selecionado 
o volume 0, o parametro volume e ignorado. 

Pode-se usar o parametro volume em combinacao com o de slot ou drive, ou ambos, em qual- 
quer sequencia. Aqui estao alguns exemplos: 

LOAD CARGA,02*024 
RUN F0L.HA * S3 ? 0111 


MAIS COMANDOS DO DISK II 


J£ sabemos consultar o que tern num disco usando o CATALOG, sabemos carregar e executar 
programas. Vamos ver como colocar nossos proprios programas em disco, usando os comandos 
INIT, SAVE, DELETE, LOCK, RENAME e VERIFY, que serao descritos abaixo. 

INIT 

Antes que se possa gravar algo no disquette, ele precisa ser inicializado. Quando isso acontece, 
qualauer coisa gravada anteriormente e zerada, por isso deve-se ter cuidado para nao inicializar um 
disquette que contenha informacoes uteis. 

0 comando INIT coloca no disquette qualquer programa que esteja na memoria no momen- 
to de sua execugao. Esse programa se tornara de saudacao, porque sera executado automatica- 
mente toda vez que se carregar o DOS a partir daquele disquette. Tais programas podem ser 
simples ou complexos, de acordo com o desejado. Por exemplo, suponha um disquette que con¬ 
tenha um sistema de mala direta. Poder-se-ia pensar em usar esse programa como o de saudacao. 
Dessa forma, ao se colocar o disquette no drive e carregar o DOS, pronto! 0 programa de mala 
direta ja sai rodando. Outro exemplo de programa de saudapao que consiste numa declaracao NEW 
seguida de uma END. Toda vez que o DOS e carregado, sera dado o caractere de entrada do 
BASIC (> ou ]). 

Um programa de saudacao bem escrito deve dizer algo sobre o disquette. Um exemplo tfpico 
pode ser visto abaixo: 

100 TEXT 
200 CALL -936 

300 PRINT "ESTE E 0 MEU PRIME.IRO DISQUETTTE" 

400 PRINT 

500 PRINT "INICIALIZADO EM 25/3/83" 

600 PRINT 

700 PRINT "NUM SISTEMA DE 48K COM DOS 3»3" 

800 END 

0 nome do arquivo do programa de apresentacao deve ser especificado quando se da o co¬ 
mando INIT. Sera necessario manter sempre um programa com aquele nome no disquette. Se o 
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programa de saudagao for eliminado (mostraremos como, adiante), aparecera a mensagem de erro 
FILE NOT FOUND toda vez que se carregar o DOS daquele disquette. A unica forma de parar 
com a mensagem e colocar urn programa no disquette com o nome do programa de saudagao. Isso 
pode ser uma tarefa dif fcil se esse nome nao for lembrado, porque e dif fcil determinar o nome do 
programa de saudacao depois de dado o I NIT. A melhor solucao e prevenir. Sempre especifique o 
mesmo nome de arquivo quando inicializar disquettes. 0 nome standard para o programa de sau¬ 
dacao e HELLO. 

Usando o Comando INIT 

Urn comando INIT tfpico parece-se com: 

INIT HELL0»S6,D1,V36 

Os numeros de slot, drive e volume sao opcionais. Se o numero de volume for inclui'do, o 
DOS atribui aquele numero de volume ao disquette. 0 INIT e o unico comando de atribuicao do 
numero de volume. Quando esse numero e usado com outros comandos do DOS, o numero especi- 
ficado deve coincidir com o atribufdo no momento do INIT. Se tal numero for omitido, o INIT 
sempre atribuira o numero de volume 254. 

Como sempre, a omissao de numero de drive e slot fara com que sejam usados no comando 
DOS anterior. Tenha certeza de qual drive o comando INIT selecionara. Se nao estiver certo, 
especifique! 

Para inicializar urn disquette novo, primeiro remova o "System Master Diskette" do drive e 
troque-o por um novo em branco. Use o comando NEW para gerar espago na memoria para o 
programa de saudacao. Digite entao este programa de saudagao mostrado acima, ou qualquer outro 
que desejar. E uma boa ideia rodar o programa de saudagao antes de grava-lo no disquette. 

Vamos atribuir o numero de volume para 123. Digite: 

INIT HELLOr86/D1, V123 

Certifique-se que a porta do drive esteja fechada e acione RETURN. A lampada do drive se acende- 
ra, acompanhada dos estalos e rufdos usuais. 0 processo inteiro leva cerca de dois minutos, 
portanto seja paciente. Apos a lampada apagar, use o comando CATALOG para ver o que esta 
gravado no disquette novo. 0 resultado deve parecer com: 

DISK VOLUME 123 
I 002 HELLO 

ou, usando o Applesoft, deve aparecer: 

DISK VOLUME 123 
A 002 HELLO 

A letra I indica que o programa de apresentagao foi escrito em BASIC. A letra A diz que foi 
escrito em Applesoft. 0 002 indica que o programa ocupa dois setores. Pode-se ver um numero 
diferente, dependendo do comprimento do programa de saudagao particular. 

Prepare um rotulo para o disquette. Escreva o numero de volume do rotulo, assim como 
qualquer informagao que achar necessaria sobre ele. Retire o disquette do drive, aplique o rotulo e 
coloque-o de volta no drive. Se for necessario recarregar usando o disquette recem-preparado, pode 
faze-lo. 
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SAVE 

Se foram seguidas as orientagoes deste capi'tulo, teremos agora um disquette recem-inicializado no 
drive 1, slot 6 do Apple II. Deve-se ter tambem uma copia do programa de saudagao na memoria. 
Use o comando LIST e veja se esta la. Se nao, digite: 

LOAD HELLO 

para ler uma copia do disco. 

0 comando SAVE guarda programas em um disquette. Para gravar uma outra copia de seu 
programa de saudagao, digite o comando SAVE seguido pelo nome do arquivo. Neste exemplo, 
usaremos o arquivo chamado PROGRAMA SAUDAGAO. Pode-se usar qualquer nome de arquivo 
valido desejado. 

SAVE PROGRAMA SAUDAGAO 

0 disco deve rodar e emitir seus rufdos habituais. Quando o SAVE termina, reaparece o 
cursor e o caractere de apresentagao do BASIC. A seguir use o comando CATALOG para verificar 
o conteudo do disco. Aparece entao algo assim: 

DISK VOLUME 123 
A 002 HELLO 

A 002 PROGRAMA SAUDAGAO 

Pode-se salvar qualquer programa BASIC desejado desta forma. 

Se j3 houver no disquette algum programa gravado com o mesmo nome que se der no coman¬ 
do SAVE, o novo programa gravado pelo SAVE ocupara o lugar do anterior. Assim o programa 
anterior sera automaticamente eliminado. Isso funcionara desde que tanto o velho quanto o 
novo programa sejam da mesma versao do BASIC. Se nao forem, o novo programa nao sera grava¬ 
do, aparecendo a mensagem FILE TYPE MISMATCH. 


DELETE 

Em pouco tempo acumulam-se muitos programas num disquette que nao tern mais proposito 
algum. 0 comando DELETE remove arquivos do disquette. 

Para eliminar ("deletar") a copia do programa de saudagao gravado, podem ser usados qual¬ 
quer dos comandos seguintes (a menos que tenha sido referenciado um outro drive no meio 
tempo). 


DELETE 

DELETE 

DELETE 


PROGRAMA SAUDAGAO,86,D1* VI2 
PROGRAMA SAUDAGAO ? V I23 
PROGRAMA SAUDAGAO 


Lembre-se que se pode usar os parametros slot, drive e volume se quisermos, ou nenhum 
deles se o drive a ser acessado e o corrente. 
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LOCK 

Alguns programas ou arquivos de dados em disquette devem ser mantidos permanentemente. Para 
isso, o DOS tem uma tecnica de protegao chamada locking (travamento). Travar um arquivo evita 
que ele seja acidentalmente eliminado ou que algo seja escrito sobre ele. Para travar um arquivo, 
digite o comando LOCK, seguido pelo nome do arquivo e os parametros opcionais drive, slot e 
volume. 0 comando seguinte trava o programa saudagao: 

LOCK HELLO 

£ sempre bom travar o programa de saudagao. 

Qualquer tentativa subsequente de eliminar ou gravar sobre um arquivo travado resultara 
na mensagem FILE LOCKED. 

Se o arquivo travado for um programa em Integer BASIC ou Applesoft e for tentado salvar 
um programa com o mesmo nome porem escrito em outro BASIC, a mensagem mostrada serS 
FILE TYPE MISMATCH. 

Num catSlogo de disquette, os arquivos travados sao identificados por um asterisco ( * ) 
precedendo o tipo do arquivo. 


UNLOCK 

Quando se decide regravar ou eliminar um arquivo travado, remove-se o lock com o comando 
UNLOCK. A declaragao seguinte destrava o programa saudagao: 

UNLOCK HELLO 

Como sempre, as especificagoes de drive, slot e volume sao opcionais e podem ocorrer em 
qualquer ordem. 


RENAME 

Pode-se trocar o nome de qualquer arquivo do disquette. Uma forma de trocar o nome de um 
programa seria le-lo, elimin^-lo, e grav2-lo com um nome novo. Uma forma melhor e usar o coman¬ 
do RENAME. Ele funciona para qualquer arquivo do disco, independente do tipo de BASIC que 
esta sendo usado. 0 RENAME tambem funciona com arquivos de texto e binSrios. Aqui esta um 
exemplo do RENAME: 

RENAME VELHONOME/NOUONOME 

0 DOS nao verifica se o nome do novo arquivo ja existe no disquette. Se existir, ficarao 
dois arquivos com o mesmo nome. Isso pode causar muita confusao e dificultara a recuperagao. 

Nao faga RENAME com o programa saudagao a menos que coloque um novo programa com 
o nome velho no disquette. 0 RENAME nao muda nomes que o DOS travou quando o sistema do 
disquette e carregado. 

Nao se pode mudar o nome de um arquivo travado. 

Pode-se especificar o drive, slot e volume (em qualquer ordem) se desejado. 
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VERIFY 

Ocasionalmente, pode-se querer verificar se um arquivo esta intacto. A melhor forma de fazer 
isso e usando o comando VERIFY. 0 comando seguinte testa o programa saudagao: 

VERIFY HELLO,VI23 

A medida que o DOS grava os setores de um arquivo, ele calcula um numero, chamado 
checksum. 0 seu valor e baseado num valor numerico para cada caractere do setor. Ele tambem 
e gravado no setor. Quando se executa o comando VERIFY, o DOS recalcula o checksum para 
cada setor do arquivo e compara com o gravado. Se ele detectar qualquer diferenga entre os valo- 
res, sera devolvida a mensagem I/O ERROR. 

Se todos os valores calculados coincidirem com os gravados, o DOS nao manda nenhuma 
mensagem; reaparecem o cursor e o caractere do BASIC. 

Assim como muitos outros comandos do DOS, pode-se especificar slot, drive e volume na 
ordem que se desejar. 


USANDO COMANDOS DOS 
DOS EM PROGRAMAS 


Ate agora todos os comandos do DOS usados foram digitados no teclado do Apple II. Porem os 
programas, em BASIC que usam arquivos podem incluir comandos do DOS. 

Para usar um comando DOS dentro de um programa BASIC, coloca-se uma declaragao 
PRINT pre-fixada com um codigo ASCII de 4 caracteres. Use o Ctrl-D para criar este prefixo. 
0 Ctrl-D deve ser o primeiro caractere a sair na declaragao PRINT. Certifique-se que o PRINT 
dado anteriormente nao foi terminado com uma vi'rgula ou ponto-e-vfrgula. 

Desde que o Ctrl-D produz um caractere que nao e impresso, e recomendavel que se docu- 
mente cada ocorrencia com uma declaragao REM, como aqui: 

100 PRINT "RUN MENU"s REM EXISTE UM CTRL-D 

ENTRE A PRIMEIRA ASPA E 0 R DE RUN 

Pode-se simplificar as coisas definindo uma variavel como CTRL-D, e mandando imprimir a 
variSvel seguida pelo comando DOS. A variSvel D$ e comumente usada para isso, mas pode-se usar 
qualquer outro nome tambem. Usando a variavel padronizada D$ em todos os programas eles 
se tornam compati'veis uns com os outros e com todos os de outras pessoas. Ponha uma I inha 
como a seguinte no seu programa BASIC: 

10 D* * REM EXISTE UM CTRL-D IN VI SI DEL. 

ENTRE AS ASPAS 

ou, em Applesoft, pode-se usar: 

10 l)$ - CHR$ (4)5 REM CHR* f'♦ > - CTRL-D 

Assim, sempre que o D$ for usado, sera facil ver que se trata do caractere CTRL-D. 
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Tente rodar o programa mostrado abaixo no seu Apple II: 


•10 

D* = 

REM 

CTRL 

20 

FOR I 

= 1 TO 

10 

30 

PRINT 

D*r'CAl 

f'ALOG 

40 

NEXT 

I 


30 

END 




A menos que se tenha mais de 18 arquivos no disquette, deve-se ver com isso o catalogo mostrado 
10 vezes, sem tocar qualquer tecla. Se existirem mais de 18 entradas no catalogo, deve-se acionar 
uma tecla cada vez que houver uma parada. 


USANDO ARQUIVOS EM DISCO 


0 Apple II opera com dois tipos de arquivos em disco: arquivos sequenciais e aleatorios. Ambos 
contem blocos de dados, chamados campos. Um campo pode ter um ou varios caracteres de com- 
primento. 


Arquivos Sequenciais 

Arquivos sequenciais, como o nome indica, so podem ser acessados de maneira seqiiencial. Para ler 
ou gravar o ultimo campo, deve-se primeiro ler ou gravar todos os campos que o antecedem. Para 
algumas aplicagoes, os arquivos sequenciais sao interessantes. 


Arquivos Aleatorios 

Arquivos aleatorios sao mais flexfveis que os sequenciais. Pode-se ler ou gravar qualquer campo no 
arquivo nao importando sua colocagao. Para muitas aplicagoes, este tipo de arquivo e a melhor 
solugao. 


USANDO ARQUIVOS SEQUENCIAIS 

Para usar arquivos sequenciais, e necessario aprender alguns comandos adicionais do DOS: OPEN, 
CLOSE, READ e WRITE. 


Abrindo Arquivos Sequenciais 

Os arquivos em disco devem ser abertos antes de serem acessados. Abrir um disco faz com que o 
DOS obtenha informagoes sobre ele: se ele esta no disco e, se estiver, sua posigao. 0 OPEN tam- 
bem reserva uma area de memoria para ser usada como buffer para o disco. Este buffer permite 
acessar partes pequenas do arquivo sem necessidade de ativar o drive de disco a cada vez que se 
acessa um campo, ganhando tempo. 0 comando OPEN parece-se com: 
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OPEN NOMEARQ 7 S6 7 D2 7 099 

Se o arquivo nao existe como especificado, o DOS cria um novo no diretorio do disco. 
Dentro de um programa, o comando OPEN deve estar dentro de uma declaragao PRINT 
e deve ser precedido pelo caractere CTRL-D. 

0 programa abaixo cria o arquivo seqiiencial SEQU^NCIA no disco do drive corrente: 

100 LK ~ REM CTRL--D 

200 PRINT 7 "OPEN SEQUENCIA" 

300 END 

Vamos chama-lo Programa 1. 

Pode-se incluir qualquer combinagao de parametros slot, drive e volume com o comando 
OPEN: 


100 D* = ""s REM CTRL-D 

200 PRINT D*5"OPEN SEQUENCIA 7 S6 / D1 , VI 23 
300 END 


ou 


200 PRINT D$ 5 "OPEN SEQUENCI A 7VI 23 7 S6" 

Note que todos os parametros sao colocados antes do fechamento das aspas, e sao separados por 
vi'rgulas. 

Apos rodar o programa, o arquivo SEQUENCIA estara presente no catalogo. Confirme digi- 
tando CATALOG. Este devera parecer-se com: 

DISK VOLUME 123 

*A 002 HELLO 
T 001 SEQUENCIA 

Veja a letra T antes do numero de setores de SEQUENCIA. Teo codigo que indica que 
SEQUENCIA e um arquivo de texto, em oposigao a arquivos de programa em Applesoft ou Integer 
BASIC, ou arquivos binSrios. O asterisco ( * ) antes do tipo de HELLO indica que ele esta travado. 


Fechando Arquivos 

Na verdade, o Programa 1 e bastante pobre, por uma boa razao: ele nao fecha o arquivo depois de 
opera-lo. 0 comando CLOSE e muito importante. Nao fechar os arquivos pode resultarem perda 
de dados, e possivelmente destruigao de dados em outro disquette (veja a segao sobre panes de 
software neste capftulo). 0 comando CLOSE tern dois formatos. 0 primeiro e: 

CLOSE 

0 comando CLOSE sem parametros fecha todos os arquivos, em todos os disquettes, indepen- 
dente do drive, slot e volume em que estiverem. 

As vezes 6 necessario fechar um ou mais arquivos especi'ficos. Para fechar arquivos indivi¬ 
duals coloca-se o nome do arquivo na frente do comando CLOSE, como: 
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CLOSE NOMEARQ 

Nao e necess^rio nem permitido que se coloque parametros de drive, slot ou volume no comando 
CLOSE. 0 DOS sabe onde o arquivo esta desde que ele ja foi aberto. 

0 Programa 1 pode ser corrigido adicionando as linhas: 

290 PRINT D*;"CL0SE" 

ou ainda: 

290 PRINT D*?"CLOSE SEQUENCIA" 


Gravando em Arquivos Sequenciais 

0 Programa 1 e inutil ainda. Os disquettes sao usados para armazenar e recuperar informagoes. 
Como nao se pode recuperar nada que nao tenha sido gravado no disco, vamos ver como gravar 
informagoes no disco. 

Mandam-se os dados para o Disk II da mesma forma que para tela ou impressora: via decla- 
ragao PRINT. Qualquer coisa que se imprime pode ser mandada para o disco. De fato, pode-se 
visualizar urn arquivo sequencial como uma te-a de vi'deo, ou melhor ainda, como papel numa 
impressora. 

Quando se grava alguma coisa em um arquivo, o DOS atualiza urn apontador interno, que 
aponta a proxima posigao da superfi'cie do disco para guardar o proximo dado, tal como a impres¬ 
sora pula para a proxima linha. 

Um arquivo sequencial so pode se mover para a frente. 0 comando OPEN move o apontador 
para o infcio do arquivo. 

Antes de se gravar qualquer coisa no disco, deve-se antes dar o comando WRITE para infor- 
mar ao DOS que as declaragoes PRINT serao para gravar no arquivo, ao inves da tela. Para arquivos 
sequenciais, o comando WRITE e: 

WRITE NOMEARQ 

Apos dar este comando, as sai'das subsequentes vao para o arquivo especificado. Note que 
sao inclui'das as mensagens de erro. Entretanto, apos a mensagem ser gravada no arquivo, o coman¬ 
do WRITE 6 cancelado. So e visto o cursor e o caractere do BASIC na tela. 

0 comando WRITE deve estar dentro de uma declaragao PRINT, precedida por CTRL-D. Se 
for tentado dar o comando WRITE no modo imediato, aparece a mensagem de erro NOT DIRECT 
COMMAND. Ponha as seguintes linhas no Programa 1: 

210 PRINT D$?"WRITE SEQUENCIA" 

220 PRINT "ESTE TEXTO MAI PARA 0 ARQUIVO" 

Este programa faz o seguinte: 

1. Cria um arquivo, se necessario. 

2. Abre o arquivo. 

3. Guarda texto no arquivo. 

4. Fecha o arquivo. 
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Pode-se inserir tantas declarapoes PRINT entre as linhas 210 e 290 quanto desejado. Pode-se 
gravar texto, numeros e variaveis, em qualquer combinapao, desde que a sintaxe do PRINT esteja 
correta. Por exemplo: 

220 FOR I « 1 TO 100 
230 PRINT I 
240 NEXT I 

2 c 5 0 P R INT " A B CD E FGHIJ K L HN 0P 0R 8 TUV WX Y Z " 

Veja que so se usa o prefixo Ctrl-D com comandos DOS e nunca quando se esta gravando 
dados no arquivo. 

Tome cuidado para nao gravar dados no arquivo com as funpoes FLASH ou INVERSE 
atuantes, desde que esses caracteres nao sao tratados convenientemente pelo DOS. 

Lembre-se que a cada vez que se roda este programa, o que estiver na declarapao PRINT vai 
cobrir e apagar os dados que ja estiverem no arquivo. Se forem colocados menos caracteres do que 
os que ja estiverem la, o restando anterior permanecera, seguindo os novos dados. 

Uma forma de contornar este problema e zerar o arquivo antes de gravar qualquer dado nele. 
0 comando DELETE (dentro de uma declarapao PRINT) pode ser incorporado ao programa antes 
do comando OPEN. Toda vez que o programa rodar, o arquivo sera eliminado e depois recriado 
com o comando OPEN. 

Entretanto, um problema ocorrera ao se tentar rodar o programa sem a presenpa do arquivo 
SEQUENCIA no disquette. Se for tentado, aparecera a mensagem FILE NOT FOUND. Pode-se 
prevenir isso dando outro comando OPEN antes do DELETE. Acontecera o seguinte: 

1. O primeiro comando OPEN cria um arquivo que ainda nao existe. 

2. O comando DELETE limpa o arquivo, nao importa quando foi criado. 

3. O segundo comando OPEN cria um novo arquivo vazio. 


Quando fizer estas modificapoes no Programa 1, lembre-se que uma vez especificado o slot, 
drive e volume, nao ser3 necessario especifica-los novamente, a menos que se deseje referenciar 
drive diferente. Com isso em mente, use o comando OPEN com os parametros slot, drive e volume 
como o primeiro comando DOS, e referencie os comandos seguintes ao drive corrente. 

Apos as modificapoes no Programa 1, ele ficara assim: 


1 00 

D* « 

11 0 

PRINT 

120 

PRINT 

200 

PRINT 

210 

PRINT 

220 

PRINT 

290 

PRINT 

300 

END 


"s REM CTRL-D 

D * S " 0 p E N S E: Q U E N CI a , VI 2 3 , S 6 * 0 1 " 

D * ? ~ D E L E T E S E Q U E N CIA " 

0*5"OPEN SEQUENCIA" 

[) 4 !W RIT E S E Q U E N CIA " 

"ESTE TEXTO VAI PARA 0 ARQUIVO* 
0%', "CLOSE" 


Sempre que se executar este programa, ele vai guardar o conteudo das deciaracoes PRINT 
entre as linhas 210 e 290 no arquivo SEQUENCIA. Pode-se usar qualquer nome de arquivo que se 
desejar, mas se o nome do arquivo for mudado, certifique-se de mudar todas as references ao 
arquivo. 
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Pode-se usar uma variavel para nome do arquivo e fazer o programa pedir o nome para fazer 
o acesso. Com essa modificagao, o programa fica: 

100 INPUT '"NOME- DO ARQUIVO" 7 F$ 

100 D* - REM CTRL-D 

T 1 0 P R IN T D *> 7 -• 0 P E N - 7 F * 7 " V 12 3 •, S 6 r D1 " 

12 0 P R IN T . D * 5 -• D E L. E T E " 7 F * 

200 P R I N T D $ 7 " 0 P E N " 7 F $ 

21 0 P R IN T l> % 7 -• U R IT E " 7 F * 

220 PRINT v ESTE TEX TO VAX PARA 0 ARQUIVO* 

290 P R I NT D % 7 -• CL0SE * 

300 END 

Pode-se ir mais alem e criar um programa que pega os numeros de slot, drive e volume com 
estas modificagdes: 

10 INPUT "NOME DO ARQUIVO: "?FS 
20 INPUT "NUMERO DO BLOT 3 "? S 
30 INPUT "NUMERO DO DRIVES "5D 
40 INPUT "NUMERO DO VOLUMEs "?V 
100 D % = s REM CTRL-D 

1 1 0 P R IN T D $ ” "■ 0 P E N " ? F : ' $ 5 " , S " 7 S 7 " D " 7 D 7 " r V 7 " * V " 7 V 

Fazendo estas modificagoes, certifique-se de entrar da forma mostrada, nao se esquecendo de 
incluir vfrgulas entre os parametros S, D e V ou o DOS nao sera capaz de distinguir os parametros 
do nome do arquivo. 

Para tornar o programa realmente util, pode-se deixar entrar o texto a ser gravado no arqui¬ 
vo, ao inves de alterar o comando PRINT. Uma forma de fazer isso e: 

150 INPUT "ENTRE TEXTO PARA ORAVAR: "7T$ 


220 PRINT T$ 

Veja que isso permite apenas a entrada e armazenamento de uma linha de texto. Pode-se alterar 
isso colocando mais declaragoes INPUT seguidas por declaragoes PRINT, mas uma vez mais fica 
determinada a quantidade de texto a ser entrada e guardada. Por que nao colocar um teste apos a 
declaragao INPUT de forma a sinalizar o fim do texto? Ponha entao um GOTO apos o PRINT 
para entrar outra linha: 

150 INPUT "ENTRE TEXTO PARA ORAVAR 5 "7 T$ 

160 IF T* « "FIM" THEN 290 
210 PRINT D*7"WRITE "7F$ 

220 PRINT T$ 

230 GOTO 150 

Agora, ao terminar de colocar o texto, pode digitar FIM e o arquivo sera fechado. Porem 
resta um grande problema. Lembre-se que o comando WRITE causa todas as safdas serem dire- 
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cionadas para o arquivo. Desde que e entrado a declaragao INPUT sai o texto ENTRE TEXTO 
PARA GRAVAR:, essa linha nao aparecera na tela apos a execugao do comando WRITE; ela 
sera armazenada como parte do texto no arquivo em disquette. 

0 comando WRITE deve ser cancelado antes que a informacao saia para o disquette. Qual- 
quer comando DOS cancelara o comando WRITE, mas o mais seguro e usar o comando nulo, 
que e Ctrl-D sozinho. Ponha esta linha de programa: 

225 PRINT D$ 

Com todas estas modificagoes, teremos um programa que permite gravar qualquer quanti- 
dade de texto desejada (com o tamanho.maximo do disquette), sob qualquer nome de arquivo, 
em qualquer drive conectado ao Apple II. 


Lendo Arquivos Seqiienciais 

Assim como as sai'das podem ser direcionadas para o disco, as entradas podem ser aceitas a partir 
de arquivos em disco. 0 comando READ identifica um arquivo em disco como fonte de dados de 
entrada. Para arquivos sequenciais o comando READ e assim: 

READ NOMEARQ 

0 comando READ deve estar dentro de uma declaragao PRINT, precedido do caractere 
Ctrl-D. Se o comando READ for dado em modo imediato sera mostrado o erro NOT DIRECT 
COMMAND. 

Depois do comando READ ser executado, as proximas declaragoes de entrada INPUT 
receberao dados do arquivo especificado ate que outro comando DOS, ou um erro, cancele o 
comando READ. 0 Programa 2, abaixo, demonstra o uso do comando READ: 


100 

D$ - " 

"2 REM CTRL-D 

11 0 

INPUT 

"NOME DO ARQUIVO PARA LERs "?F$ 

1 20 

INPUT 

"NIJMERO DO SLOT s"?S 

130 

INPUT 

"NIJMERO DO DRIVE s" ” D 

1 40 

INP UT 

-'NIJMERO DO VOLUME :"?U 

150 

PRINT 

D r " 0 P E N " 5 F $ ?-• S " r S ? " x D " 2 D 5 " , U 

1 60 

PRINT 

D$?"READ "?E$ 

170 

INPUT 

A$ 

1 80 

PRINT 

A$ 

1 90 

GOTO 1 

70 

200 

END 



O Programa 2 mostra todo o texto do arquivo criado pelo Programa 1. Apos todo o texto 
ter sido mostrado, aparecera a mensagem END OF DATA e o programa parara com a rpensagem 
BREAK IN 170. 

Veja que o Programa 2 nao tern o comando CLOSE. Explicamos que os arquivos devem ser 
fechados quando forem usados mais tarde, porem neste caso ele nao sera gravado, de forma que a 
informagao de trilha/setor nunca precisa ser atualizada (assumindo que o nome do arquivo especi¬ 
ficado realmente existe). 0 arquivo poderia ser fechado por questao de seguranga. 
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Nao e uma boa pratica escrever programas que coloquem mensagens de erro e parem sob 
circunstancias previsfveis, como o fim de dados no arquivo. 


Contornando o Erro END OF DATA 

A condigao END OF DATA pode ser detectada antes de gerar o erro. 0 Programa 2 pode sair 
para o fechamento de arquivo ao detectar o fim dos dados. A maneira mais facil de detectar o fim 
dos dados e usar o comando do Applesoft ONNER GOTO (visto no Capi'tulo 4), porem o 
ONNER GOTO nao e permitido no Integer BASIC. (Os codigos de erro do BASIC sao mostrados 
no Apendice C.) 

Uma outra forma de achar o fim do texto num arquivo escrito pelo Programa 1 e modifica-lo 
de forma que quando for digitada a palavra FIM, uma palavra ou caractere especial seja escrita 
antes de fechar o arquivo. Assim o Programa 2 procurara pelo caractere especial para fechar o 
arquivo de acordo. Este metodo funciona tanto no Applesoft quanto no Integer BASIC. 


Diferencas entre o Applesoft e o Integer BASIC 

0 comando READ identifica um arquivo em disco como fonte de dados para as declaragoes 
INPUT subsequentes. Porem essas declaragoes devem ter sua sintaxe de acordo com o BASIC 
utilizado para o programa (veja o Capi'tulo 8). De qualquer forma, os dados fornecidos por um 
arquivo dependem da forma como eles foram guardados. 

Veja o programa: 

•100 D1> « REM CTRL-D 

200 PRINT [>$;"0PEN ARQ1" 

300 PR INT D$ 5 "WRITE: ARG1" 

400 PRINT 'ALO"/" RODANDO PROGRAMA DE TESTE" 

500 PRINT l>$5"CLOSE" 

600 END 

Em Applesoft, rode este programa, e leia o texto de ARQ1 mudando as linhas 300 e 400: 

300 PRINT D$""READ ARQ1" 

400 INPUT A* 

0 valor de A$ e ALO RODANDO PROGRAMA DE TESTE. Mude o original para gravar 
de novo: 


3 00 P R IN C D S ? - UJ R IT E A R Q1 v 

400 PRINT "AL0 ? RODANDO PROGRAMA DE TESTE" 

e execute-o. Agora leia o valor guardado como antes. Agora apareceu a mensagem 7EXTRA 
IGNORED, e A$e ALO. 

Em Applesoft, as vfrgulas separam valores multiplos numa declaragao PRINT unica. 

O Integer BASIC aceita ambas as linhas como uma, de forma que o valor de A$ guardado 
pelo primeiro exemplo sera ALO RODANDO PROGRAMA DE TESTE, e o valor de A$ na segun- 
da versao da linha 400 sera ALO, RODANDO PROGRAMA DE TESTE. 
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Usando a Declarapao GET do Applesoft para Ler Arquivos de Texto 

Em Applesoft, a declarapao GET pode ser usada para ler dados de arquivos em disco. A declarapao 
GET difere da INPUT por aceitar um caractere de cada vez. Assim, se um arquivo contem o texto 
ESTE ARQUIVO CONTEM TEXTO, e e executado um OPEN, um READ, e depois um GET, o 
primeiro GET devolvera a letra E; o proximo GET devolvera a letra S, e os GET subseqiientes 
devolverao T, E, espaco em branco. A, R, Q, U, I, V, 0 etc., ate que todos os caracteres do texto 
tenham sido lidos. Se o GET devolver vfrgulas ou Carriage Return, o programa podera detectar e 
interpretar de acordo. 

0 Programa 3, mostrado abaixo, demonstra como um arquivo pode ser lido, usando a decla- 
rapao GET do Applesoft para montar uma linha de texto, um caractere por vez. 

100 DS = CHR* <4>: REM CTRL-D 

200 INPUT "NOME DO ARQUIVO PARA LER s ":F$ 

300 INPUT "NUMERO DO SLOT: "?S 

400 INPUT "NUMERO DO DRIVE: " ? 0 

500 INPUT "NUMERO DO VOLUME: "?V 

600 PRINT D$•"OPEN " " F $" " * V " ? V: " * D " : D ’ " ? 8 " ? S 

700 PRINT D$ 5"READ "?F$ 

800 R$ * "" 

900 GET A* 

1000 IF A$ « CHR$ < 13) THEN 1300 
1100 B $ * B* + A$ 

1200 GOTO 900 

1300 REM DEVOLVE CARACTERE ACHADO 
1400 REM B* ESTA COMPLETO 
1500 PRINT B* 

1600 GOTO 800 
1700 END 


Porem a declarapao GET tern um problema quando usada com arquivos em disco. 0 pri¬ 
meiro caractere impresso apos o GET ter sido executado e ignorado. Se o primeiro caractere e 
um comando DOS, entao o caractere Ctrl-D sera ignorado, o que significa que todo comando 
DOS sera impresso e nao interpretado como comando DOS. 

Para resolver este problema e preciso imprimir um caractere sem significado primeiro, que 
sera ignorado. Um bom caractere para usar e o Ctrl-A (codigo 1 ASCII), por ele nao ser impri- 
mfvel e nao ter significado especial (em oposipao ao CTRL-D, por exemplo). 

0 Programa 3 pode ser corrigido, trocando a linha 1500 para ler: 

1500 PRINT CHR$ <1> ?B$: REM CHR* <1) « CTRL-A 


Guardando Numeros em Arquivos 

Pode-se usar o Programa 1 para guardar numeros em arquivos, tanto como parte de texto, como 
em: 


220 PRINT "MEU ENDERECO E RUA DEZ NUMERO 1123" 
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quanto diretamente em valores numericos: 

230 PR INT 1r 2 * 3 r 4 » 5 

ou via variSveis numericas: 

240 PR INT A r B » C / D r E: 

Se forem guardados numeros diretamente, pode aparecer um resultado estranho ao se ler de volta 
no Programa 2. 

Usando o Integer BASIC, numeros separados por vfrgulas ou pontos-e-vfrgulas formarao um 
numero grande (12345 na linha 230 acima); para um total de uma linha de safda. 

Usando Applesoft, isso se torna ainda mais confuso; os primeiros tres numeros sao concate- 
nados (123) e vistos como uma safda de impressao. Os proximos dois valores (4 e 5) produzem 
uma linha de safda cada, dando o total de tres linhas de safda. 

Esses problemas vem do formato usado para guardar dados em arquivos de disco. As vfrgulas 
nao sao armazenadas entre os numeros se eles nao forem para a tela. Em vez disso, na tela a vfr- 
gula causa a impressao do dado na proxima linha de tabulagao. Quando a safda e direcionada para 
o arquivo, entretanto, o DOS despreza completamente as vfrgulas. Nao acontece nada equivalente 
a tabulapao. Como resultado, os valores tornam-se concatenados ate que o retorno (codigo 13) os 
separe. Ele, Carriage Return, e o unico caractere que o DOS interpreta como separador de valores. 
0 Integer BASIC manda um Carriage Return apos a quinta parada de tabulagao (vfrgula), enquanto 
o Applesoft o manda apos a terceira. 

Para evitar problemas, certifique-se de que cada campo numerico guardado num arquivo em 
disco seja seguido pelo caractere Carriage Return. A forma mais facil de fazer isso e mandar cada 
numero com uma declaragao PRINT separada: 

230 PRINT is PRINT 2s PRINT 3s PRINT 4s 
PRINT 5 

Outro metodo permitido aos usuarios do Applesoft e incluir um caractere Carriage Return como 
separador na lista de parametros da declaragao PRINT: 

230 PRINT 1;CHR*<13)J2?CHR$<13)?3?CHR$<1 
3) ?4",CHR$< 13) ?5 

Pode ser mais comodo definir uma variavel como o caractere Carriage Return, e imprimi-la: 

•11 R* » CHR$(13)s REM CARACTERE RETURN 


230 PRINT 1?R*525R*535R*?4?R*55 

Isso torna o programa mais limpo. 


COMO INSERIR DADOS NUM ARQUIVO SEQUENCIAL 

Um arquivo seqiiencial deve ser fechado apos se gravar dados nele. Quando se fecha um arquivo, 
perde-se o controle do local em que o ultimo item foi gravado. Para adicionar dados ao fim do 
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arquivo, entao, deve-se primeiro acha-lo. Pode-se ler cada item do arquivo ate o ultimo, porem 
isso consome muito tempo para arquivos longos. 0 comando APPEND faz isso para nos. 

Este comando APPEND coloca o apontador de arquivo no primeiro caractere nao usado 
apos o fim do arquivo. Se for dado um READ apos o APPEND, obtem-se a mensagem de erro 
END OF DATA. Se se grava apos o APPEND, o novo dado sera adicionado ao que ja estava no 
arquivo. 

0 comando APPEND e usado no lugar do OPEN. Existem duas diferenqas importantes entre 
os comandos APPEND e OPEN: 

1. 0 APPEND requer que o arquivo ja exista. Se nao, o erro FILE NOT FOUND aparece. 
O APPEND nao cria arquivo, ele assume que o arquivo ja existe. 

2. 0 APPEND coloca o apontador no final do arquivo. 0 OPEN coloca o apontador no 
infcio do arquivo. 

0 formato para o comando APPEND e o mesmo que o do comando OPEN. Aqui esta um 
exemplo: 


APPEND NOMEARQ,S6,02»09? 

Como sempre, os comandos slot, drive e volume sao opcionais. 


O COMANDO POSITION 

Outro comando util e o POSITION. Ele move o apontador para a frente (nunca para tras) do nu- 
mero especificado de campos em relapao a posigao atual do apontador. O comando se parece 
com: 


POSITION NOMEARQrR30 

R indica campo relativo, o numero apos o Rdao numero de campos para pular. Os campOS 
sao marcados pelo caractere carriage return, e o comando POSITION acima conta 30 carriages 
returns a partir da posigao atual e move o apontador do arquivo para la. Se for dado um RO, o 
apontador nao se move. 

Na verdade, o POSITION examina o arquivo caractere por caractere, iniciando pela posiqao 
corrente. Se nao existirem campos suficientes, ou e encontrado um byte nao usado, o erro END 
OF DATA e mostrado imediatamente. Nao e necessario executar o INPUT ou o GET para dar a 
mensagem de erro. 

Um arquivo deve ser aberto antes que possa ser referenciado pelo POSITION. Quando se 
abre o arquivo, seu apontador fica apontado para o infcio, se for dado o comando POSITION 
quando o apontador estiver no infcio do arquivo, ele ira efetivamente acessar o campo abso/uto 
dentro do arquivo. 

Lembre-se, como qualquer outro comando do DOS, o POSITION cancela os comandos 
READ e WRITE. Utilize o POSITION antes do READ e do WRITE e nao depois. 
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USANDO ARQUIVOS DE ACESSO ALEATORIO 

Os arquivos de acesso aleatorio sao estruturados em sepdes chamadas registros. Cada registro 
num arquivo particular suporta a mesma quantidade de informapao, definida em numero de bytes 
(caracteres), quando o arquivo e criado. 

A quantidade de informapao que pode ser guardada num registro e referida como compri- 
mento do registro. 

Os registros sao identificados por um numero indicando sua posipao absoluta no arquivo. 
0 primeiro registro de todo arquivo tern numero 0, o seguinte numero 1, seguido pelo 2 etc. 

0 menor arquivo de acesso aleatorio tern um registro. A expansao e feita quando novos regis¬ 
tros sao adicionados, porem eles nao encolhem. Para remover registros nao usados de um arquivo 
de acesso aleatorio e reduzir seu tamanho, deve-se copiar os registros que devem ser preservados em 
outro arquivo aleatorio novo. 

Os programas devem especificar qual registro de um arquivo aleatorio deve ser selecionado 
e que parte dentro desse registro deve ser acessada. 


Abrindo Arquivos de Acesso Aleatdrio 

Para definir um arquivo como de acesso aleatorio, deve-se incluir um parametro adicional quando o 
arquivo e aberto. 0 parametro (L) especifica o comprimento de cada registro, como aqui: 

OPEN NOMEARQ>L I 0,86 rD1,VI00 

0 parametro comprimento deve ter um valor entre 1 e 32767. Nao deve ser o primeiro parametro 
na lista, mas deve estar presente se o arquivo for de acesso aleatorio. 

Os programas nunca devem gravar registros maiores que o tamanho especificado no para¬ 
metro L, incluindo vfrgulas e carriages returns. Se forem gravados caracteres em excesso num 
registro, o registro seguinte podera ser superposto ou combinado, destruindo sua informapao. 


Fechando um Arquivo de Acesso Aleatorio 

O comando CLOSE e identico para os arquivos de acesso sequencial e aleatorio. 


Leitura e Gravapao em Acesso Aleatorio 

Os comandos READ e WRITE requerem o parametro registro para arquivos de acesso aleatorio. 
0 parametro registro move o apontador do arquivo para o ini'cio do registro. 0 exemplo seguinte 
usa o parametro registro (R): 

READ NOMEARQ ? R13 

ou 

WRITE NOMEARQ/R6 

0 parametro registro nao precisa ser o unico numa lista, pode-se tambem especificar drive, 
slot e volume. Os parametros podem aparecer em qualquer ordem. Se o parametro registro nao esta 
presente o apontador nao se move. 
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UM EXEMPLO PRATICO DE ACESSO ALEAT6RIO 

Os programas seguintes demonstram um uso pr^tico de arquivos de acesso aleatorio. Eles rodam 
tanto em Applesoft quanto em Integer BASIC. Para usar o segundo programa em Integer BASIC, 
adicione uma declaragao DIM antes da linha 100, para a varicivel B$ e C$ (255 caracteres cada). 
0 primeiro programa cria um arquivo de nome RANDOM. 


10 REM PROGRAMA DE CRIACAO DE ARQUIVO ALEATOR10 
20 REM 

30 REM RODE ESTE PROGRAMA PRIMEIRO, POIS EL.E 
40 REM GIJARDA INF0RMACA0 NO REGISTR0 ZERO, QUE 
50 REM DEVE EXISTIR PARA 0 PROXIMO PROGRAMA OPERAR. 

60 REM 

100 D* ~ REM CTRL-D 

200 PRINT D* ? "OPEN RANDOM,S6,D1 ,L256" s REM ABRE ARQUIVO 
300 PRINT D*5"WRITE RANDOM,RQ" s REM GRAVA REGISTRO ZERO 
400 PRINT 0 : REM 6UARDA ZERO NO REGISTRO ZERO 
500 PRINT 0*5"CLOSE" : REM FECHA ARQUIVO 
600 END 


Uma vez que o arquivo tenha sido criado, o segundo programa permite ler, alterar, adicionar 
e listar os registros do arquivo. Cada registro conterd uma lista de informapoes digitadas no teclado. 


10 REM DEMONSTRACAO DE ARQUIVO DE ACESSO ALEATOR10 
20 REM 

30 REM ESTE PROGRAMA MONTA UM ARQUIVO ALEATOR10 
40 REM QUE CONSISTE EM REGISTROS DE UMA UNICA LINHA 
50 REM 

60 REM 0 REGISTRO ZERO CONTEM UM NUMERO INDICANDO 
70 REM 0 ULTIMO NUMERO DE REGISTRO EM USO. 

SO REM 

85 REM NOTAs 0 ARQUIVO "RANDOM" DEVE SER CRIADO ANTES 
90 REM DE TENTAR USAR ESTE PROGRAMA 

95 REM 

100 D$ * "" : REM CTRL-D 

200 PRINT D*5"OPEN RANDOM,S6rD1,L256" 

225 PRINT D$ ?"READ RANDOM,RO" : REM LE REGISTRO ZERO 

250 INPUT M : REM M = 0 ULTIMO REGISTRO EM USO 

275 PRINT D$ : REM CANCELA 0 COMANDO READ 

300 CALL -936 : REM LI MPA A TELA 

400 PRINT "DEMONSTRACAO DE ACESSO ALEATOR10" 

500 PRINT s PRINT : PRINT 
600 PRINT "COMANDOSs" : PRINT 
700 PRINT " 0 * PARA" 

800 PRINT " 1 « LE UM REGISTRO" 
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900 P 
1000 
1100 
1200 
1 300 
1400 
1500 
1 600 
1700 
1800 
1900 
2000 
2050 
2100 
2150 


RINT 

PRINT 

PR INI- 

PRINT 

PRINT 

INPUT 

IF C 


2 = SOMA UM REGISTRO" 

" 3 « MUDA UM REGISTRO" 

" 4 « LISTA TODOS REGISTR08" 

s PRINT 

"QUAL"? 


IF 

IF 

IF 


IF C= 
GOTO 
REM 
REM * 
REM 


0 THEN 8300 

1 THEN 2200 

2 THEN 3300 

3 THEN 4600 
THEN 6700 


300 


: REM PULA 
s REM PARA 
: REM A 
s REM ROTINA 
: REM SEL..ECIONADA 
s REM OU REFAZ 0 MENU 


x- * x L.E UM REGISTRO * * * * 


2200 CALL -936 5 REM LIMPA A TELA 

2300 PRINT : PRINT "LE UM REGISTRO" : PRINT 

2400 PRINT "QUE NUMERO DE REGISTRO <0 PARA PARAR)"? 


2500 INPUT R 

2600 IF R<1 THEN 300 : REM RETORNA AO MENU PPAL 
2650 IF R >M THEN 2200 = REM REGISTRO NAO EXISTE 


2700 PRINT D$? "READ RANDOM* R" " R 5 REM PREPARA PARA L.ER 

2800 INPUT B$ : REM LE OS DADOS 

2900 PRINT D$ s REM CANCELA 0 COMANDO READ 

3000 PRINT : PRINT B$ : PRINT : REM MOSTRA 0 DADO 

3100 GOTO 2400 : REM PEDE OUTRO NUMERO DE REGISTRO 

3150 REM 


3200 REM x x x x SOMA UM REGISTRO x x x x 
3250 REM 

3300 CALL -936 5 REM LIMPA TELA 

3400 PRINT : PRINT "ADl'CIONA IJM REGISTRO" s PRINT 
3500 PRINT "PROXIMO NUMERO DE REGISTRO == "5M+1 
3600 PRINT : PRINT "ENTRA DADO PARA 0 REGISTRO "7M+1 


3625 PRINT "(DIGITE CRETURN3 AGORA PARA PARAR AUMENTO)" 
3700 INPUT B$ : REM PE6A RESPOSTA DO USUARIO 
3750 IF B$ a THEN 300 : REM SAIR COM TECLA C RETURN I 
3800 PRINT D $r "WRITE RANDOM* R" " M+1 : REM PREPARA 


P/E8CREVER 


3900 PRINT B$ s REM MANDA DADO PARA ARQUIVO 
4000 M « M + 1 : REM INCREMENTA ULTIMO NUMERO DE REGISTRO 
4100 PRINT DT>" "WRITE RANDOM,RO" 3 REM PREPARA PARA 
ESCREVER 


4200 PRINT M : REM GUARDA VALOR ATUAL 
4300 PRINT D* : REM CANCELA COMANDO WRITE 


4400 GOTO 3500 : REM VOLTA PARA OUTRO REGISTRO 
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4450 REM 

4500 REM * * * * ALTERA UM REGISTRO * * * * 

4550 REM 

4600 CALL -936 : REM LIMPA A TELA 

4700 PRINT : PRINT "ALTERAR REGISTRO" : PRINT 

4800 PRINT "NUMERO DO REGISTRO (0 PARA PARAR)"; 

4900 INPUT R 

5000 IF R<1 THEN 300 : REM VOLTA AO MENU PRINCIPAL 

5050 IF R >M THEN 4600 : REM TENTA DE NOVO SE NAO HA REG. 

5100 PRINT D$;"READ RANDOM,R";R : REM PREPARA PARA LER 

5200 INPUT B$ : REM LE 0 REGISTRO 

5300 PRINT D$ : REM CANCELA 0 COMANDO READ 

5400 PRINT : PRINT B$ : PRINT s REM MOSTRA 0 DADO 

5500 PRINT "ENTRA 0 NOVO DADO" 

5600 PRINT "(ACIONE CRETURN3 PARA PARAR ALTERACAO)" 

5700 PRINT 

5800 INPUT C* : REM PEGA RESPOSTA DO USUARIO 
5900 IF C$>"" THEN 6200 : REM PULA SE DADO NOVO 
6000 PRINT "REGISTRO "JR;" INTACTO ' ! ! ": REM VOLTA SE 

6100 GOTO 4800 : REM NAO DESEJA ALTERAR 

6200 PRINT DU;"WRITE RANDOM,R"JR : REM PREPARA PARA GRAVAR 

6300 PRINT C$ : REM GUARDA DADO ALTERADO 

6400 PRINT D$ : REM CANCELA COMANDO WRITE 

6500 GOTO 4800 : REM VOLTA PARA ALTERAR OUTRO REGISTRO 

6550 REM 

6600 REM * * * * LISTA TODOS OS REGISTROS * # * * 

6650 REM 

6700 CALL -936 : REM LIMPA TELA 

6800 PRINT : PRINT "LISTA TODOS OS REGISTROS" : PRINT 

6900 R = 0 J REM LIMPA 0 CONTADOR 

7000 R = R + 1 : REM INCREMENTA CONTADOR 

7100 IF R >M THEN 7700 : REM PARA APOS ULT.REGISTRO 

7200 PRINT D$J"READ RANDOM,R";R : REM PREPARA PARA LER 

7300 INPUT B* : REM L.E 0 DADO 

7400 PRINT "NUMERO DO REGISTRO = "JR : REM NUM.DO REGISTRO 
7500 PRINT B* : PRINT s REM MOSTRA DADOS DO REGISTRO 
7600 GOTO 7000 : REM LOOP PARA PROXIMO REGISTRO 
7700 PRINT D1> : REM CANCELA COMANDO READ 

7800 PRINT : PRINT "# * * » FIM-DE-ARQUIVO" . REM MOSTRA 
MENSAGEM EOF 

7900 PRINT "AC I ONE! RETURN PARA CONTINUAR"; : REM PEDE A 
RESPOSTA 

8000 INPUT B$ : REM PEGA RESPOSTA DO USUARIO 
8100 GOTO 300 : REM RETORNA AO MENU PRINCIPAL 
8150 REM 
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8200 REM * * * * PARA 0 PR06RAMA * * * * 

8250 REM 

8300 PRINT D$?"CLOSE" = REM FECHA ARQUIVO 
8400 CALL -936 : REM LIMPA TELA 

8500 FOR I a 1 TO 24 s PRINT : NEXT I : REM MOVE PARA 
ULTIMA LINHA 

8600 PRINT "PROG RAMA COMPLET 0 -" 

8700 END 


O PARAMETRO BYTE 

Byte e um outro parametro util para arquivo aleatorio. 0 parametro byte e usado com os coman- 
dos READ, WRITE e POSITION para mover o apontador a um byte especffico (caractere) dentro 
de um registro selectado. Uma vfrgula e a letra B podem ser adicionadas ao comando READ, 
WRITE e POSITION. 0 parametro registro deve estar presente com o parametro byte. Aqui esta 
um exemplo: 

READ NOMEARO r R19» 83 

Neste exemplo, a leitura iniciara no quarto byte do vigesimo registro. (Lembre-se, o primeiro 
byte tern numero 0.) 0 parametro byte pode mover o apontador para a frente ou para tras dentro 
do registro. 

Se for usado o parametro byte, os registros devem ter um formato exato de dados. Deve-se 
saber a posipao exata dos bytes de cada campo dentro do registro, ou o resultado obtido nao tera 
maior significado. 

Quando estiver usando o parametro byte com o comando POSITION, lembre-se que ele 
cancela qualquer comando READ ou WRITE anterior. Pode-se executar um comando READ ou 
WRITE que inclua um parametro de registro, e entao usar o POSITION para mover para a frente 
ate o campo correto. Deve-se entao executar outro READ ou WRITE, desde que o POSITION 
cancele os comandos READ ou WRITE anteriores. 

0 POSITION apenas move o apontador a frente para outro campo no registro corrente. 
Dentro do campo, o parametro byte permite referenciar subcampos, um caractere por vez. 


OUTROS COMANDOS DOS 


Existem alguns outros comandos que ainda nao foram estudados. Sao eles o EXEC, MAXFILES, 
TRACE, MONe NOMON. 

EXEC 


0 EXEC e um comando muito especial. Ele permite dar o controle do Apple. 11 para um arquivo 
de texto. 0 comando EXEC se parece com: 
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EXEC NOMEARQ,R6,85,02,U23 

0 parametro R e similar ao parametro de registro do comando POSITION. Ele referenda o 
numero de campo relativo ao arquivo onde o processamento inicia na execugao do EXEC. Como o 
EXEC abre o arquivo e coloca o apontador no infcio do arquivo EXEC, o parametro R referencia 
um numero de campo absoluto dentro do arquivo. RO e a condigao por ausencia de informagao, 
que inicia a execugao no infcio do arquivo. R1 inicia a execugao no segundo campo. 

As especificagoes de registro relativo, slot, drive e volume sao opcionais e podem ocorrer em 
qualquer ordem. 

Quando e executado um EXEC, o arquivo especificado e aberto, e as declaragoes READ e 
INPUT implfcitas sao executadas. Se nao houver nenhum parametro R presente, a primeira linha 
no arquivo e tomada. Se houver R, entao a linha especificada pelo R e tomada. 

A linha tomada e tratada como se ela fosse digitada no teclado em modo imediato. Se a linha 
nao tiver significance, aparecera a mensagem 7SYNTAX ERROR ou *** SINTAX ERR. Se for 
uma linha valida, como: 

100 PRINT "1810 E UM TESTE" 

sera guardada na memoria, como se tivesse sido digitada. Se for um comando direto, como LIST 
ou RUN, sera executada. 

Apos a execugao do comando da primeira linha, a linha seguinte e lida e executada. Assim 
o processo continua ate que o fim do arquivo seja encontrado, quando o controle do Apple II 
retorna ao teclado. 

Suponha um arquivo de texto chamado BUBBA que contenha as seguintes linhas: 

PRINT "EU TENHO CONTROLE SOBRE SEU APPLE I » I" 
FP 

•100 OR 

200 FOR I * 0 TO 39 

300 FOR J = 0 TO 39 

400 COLOR r:: RND < 0) *15 
500 PLOT I/J 
600 NEXT J 
700 NEXT I 

800 FOR I - 1 TO 5000 : NEXT I 

900 TEXT s CALL -936 
99? END 
LIST 


FOR I a 1 TO 5000 s NEXT I 
RUN 

NEW 

PRINT "TERMINOU. AQIJI ESTA 0 CAT A LOGO DO DISCO: 
CATALOG 


Quando for digitado o comando: 
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EXEC BUBBA 

varias coisas vao acontecer. Primeiro a mensagem sera mostrada. Depois o Applesoft sera chamado. 
Depois, um pequeno programa sera carregado na memoria e listado. Apos uma breve pausa o pro- 
grama sera rodado, e entao tirado da memoria. Outra mensagem aparece, seguida pelo catalogo do 
disco corrente. 


Notas sobre o EXEC 

0 EXEC tern varias facetas interessantes que e bom conhecer. 

Apenas um arquivo EXEC pode ser aberto de uma vez. Se um arquivo que esta sendo aces- 
sado pelo EXEC contem um comando EXEC, o primeiro arquivo sera fechado e o segundo pegara 
o controle. Depois de um arquivo EXEC executar um programa, o proximo campo (isto e, linha) 
e executado. Se o programa e abortado com CTRL-C, o EXEC nao continuara. 

Se um programa que esta rodando sob um comando EXEC contem uma declaraqao INPUT, 
a entrada e feita com o campo seguinte do arquivo EXEC. Isso causa um problema, se o proximo 
campo e um comando DOS em modo imediato (e nao uma linha de programa). 0 comando sera 
executado no lugar de ser interpretado como dado para a declaraqao INPUT. 

Se um programa executa um comando CLOSE, ou se o arquivo EXEC contem um comando 
CLOSE em modo imediato, o arquivo EXEC nao sera fechado. 


Usando o EXEC para Converter um Programa de um BASIC para Outro 

0 EXEC pode ser usado para converter programas entre o Integer BASIC e o Applesoft. Se a con- 
versao for do Applesoft para o Integer BASIC, deve-se primeiro editar o programa Applesoft para 
adaptar a sintaxe do Integer BASIC. Deve-se entao guardar o programa como arquivo de texto. 
Para isso, ponha algumas linhas no programa para criar o arquivo de texto, execute o comando 
WRITE e entao liste o programa. A listagem vai para o arquivo de texto. Aqui estao as declaragoes 
necessarias: 

1 POKE 33/332 REM DESLIGA A FORMATACAO "LIST" 

2 0* = 2 PRINT Dr*‘OPEN FILE" • PRINT D$""WRITE FILE" 

3 LIST 10/32747 

4 PRINT D$5 "CLOSE"s END 

5 POKE 33/402 REM REFAZ FORMATO "LIST" 

10 REM SEM PROGRAMA TNICIA AQUI 

Quando se roda o programa, apenas as linhas 1, 2, 3, 4 e 5 sao executadas. Elas abrem um arquivo 
e guardam o programa listado nele. Quando terminar, pode-se trocar para o outro BASIC (com FP 
ou I NT, por exemplo). Digite entao: 

EXEC FILE 

As linhas do programa velho sao carregadas do disco para a memoria. Se ainda nao foi feito, deve- 
se editar o programa para corrigir as partes que ainda nao estao de acordo com as regras da nova 
linguagem. 
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MAXFILES 

0 MAXFILES permite especificar o numero maximo de arquivos que podem estar abertos a qual- 
quer tempo. Cada arquivo tem 595 bytes de memoria reservados para seu uso como buffer. Exis- 
tem apenas duas secoes de 256 bytes em cada buffer, uma para leitura e outra para gravacao. 
Os 83 bytes restantes sao usados para controle, como lista de trilha/setor. 

Quando urn arquivo e aberto, ou ocorre uma operacao em disco tal como CATALOG ou 
LOCK, o DOS le 256 bytes de informapao do disco e a coloca num buffer. Se a informapao e 
alterada e deve ser colocada de volta no disquette, 256 bytes sao copiadas do buffer e transferidas 
para o disquette. 

0 exemplo seguinte especifica oito arquivos no maximo: 

MAXFILES 8 

O numero de arquivos deve ser um inteiro entre 1 e 16. Quando o DOS e carregado, sao alocados 
tres buffers. 0 MAXFILES pode ser empregado se for necessario usar mais de tres arquivos simul- 
taneamente. E pode ser tambem usado para menos se os bytes de buffer precisarem ser usados 
para sua aplicapao especffica. 

Um buffer e usado para executar qualquer um dos comandos DOS seguintes: 


APPEND 

FP 

POSITION 

BLOAD 

1N IT 

READ 

BRUN 

INT 

RENAME 

BSAVE 

LOAD 

RUN 

CATALOG 

LOCK 

SAVE 

CHAIN 

MAXFILES 

UNLOCK 

CLOSE 

MON 

VERIFY 

DELETE 

NOMON 

WRITE 

EXEC 

OPEN 



Dessa forma, se se abrem arquivos acima do limite e se da um comando CATALOG, o erro 
NO BUFFER AVAILABLE e mostrado. Nao e requerido buffer para comandos usados fora do 
contexto do DOS (por exemplo, comando LOAD de cassette). 

Quando o MAXFILES e trocado, os programas no Integer BASIC sao zerados e os cordoes 
no Applesoft sao destrufdos. Por isso deve-se executar o MAXFILES antes de carregar e executar 
qualquer programa. 

Pode-se executar o MAXFILES dentro de um programa no Applesoft se precedido por um 
caractere Ctrl-D numa declarapao PRINT. 0 MAXFILES faz as instrucoes GOTO, GOSUB e 
outras do tipo, funcionarem incorretamente, a menos que seja a primeira declarapao num progra¬ 
ma. Para evitar destruipao de cordoes, use o MAXFILES como abaixo: 

31 REM PRI.MEI.ro ATEIBUICAO MAXFILES 

32 PRINT CHR$< 4) S"MAXFILES ?" 

33 REM PROGRAMA NORMAL COMECA AQUI 

3 4 D $ = :: C H R $ < 4) : R E M C A R A C T E R E C T R L ~ D 
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So se pode usar MAXFILES em Integer BASIC no contexto de um arquivo EXEC. Por 
exemplo, o arquivo EXEC contem tres declarapoes em modo pseudo-imediato: 

MAXFILES 8 
LOAD PROGRAM 
RUN 10 

Ele e chamado num programa como segue: 

5 PRINT D*5~EXEC MXF "• REM HANDA MAXFILES 
CONTINUA NA LINHA 10 
10 REM PROGRAMA COMECA AOUI 


USANDO INSTRUMENTOS DE DEPURAQAO DO DOS 

Como os programas que acessam arquivos em disco sao em geral de alguma complexidade, o 
DOS tern tres comandos que ajudam a depurar programas: MON, NOMON e TRACE. 


MON 

MON e abreviapao de monitor. Ele permite monitorar as informacoes que vao e vem do disco. 
0 MON usa tres parametros. 0 exemplo seguinte mostra todos os tres: 

MON C ?I/O 

Os parametros do MON especificam o tipo de informapao a ser mostrado. C causa a monitorapao 
dos comandos de disco. I causa a mostra das entradas que vem do disco. 0 causa a mostra das 
sai'das para o disco. 

Os parametros podem aparecer em qualquer ordem, e em qualquer combinapao. No mf- 
nimo um parametro deve estar presente ou o comando e ignorado. 

0 MON permanece operando ate que um NOMON, INIT ou FP seja executado, ou o DOS 
recarregado. 


NOMON 

0 NOMON cancela o efeito do comando MON. Ele usa os mesmos tres parametros que o MON 
usa, porem com o NOMON eles especificam quais dados nao devem ser monitorados. Por exemplo, 
assumindo que foi dado o MON I, 0, C anterior, o comando: 

NOMON 0 


cancela a monitorapao da sai'da para disco. A entrada do disco e os comandos DOS continuarSo 
sendo mostrados. 
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Usando o Comando TRACE 

0 comando TRACE (veja Capi'tulo 4) e usado na depuracao de programas. Mas como ele mostra 
os numeros das linhas sem carriage return, os comandos DOS ficam concatenados aos numeros das 
linhas, e ignorados. 0 remedio para isso e simples. Urn carriage return deve ser colocado antes de 
cada comando DOS. Para isso troque a linha: 

100 0% * CHR* <A) s REM CTRL-D 

para ler: 

100 D$ == CHR* M3) + C HE* <'♦) : REM RETURN + CTRL-0 

Assim,semprequeo PRINT D$ ocorrer, o caractere CTRL-D sera precedido por urn carriage return, 
separando-o da execugao do comando TRACE comum. 

Entretanto, outro problema existe. Se um comando WRITE esta em processo, todos aqueles 
numeros de linhas serao guardados no arquivo. (Desculpem, este problema nao pode ser contor- 
nado.) 


LINGUAGEM DE MAQUINA 
ARQUIVOS DE DISCO (IMAGEM BINARIA) 


0 Disk II suporta arquivo em linguagem de maquina e imagem binaria (graficos). Esses arquivos 
sao mostrados com a letra B como codigo de tipo no catalogo do disco. 

Podem ser guardadas imagens tanto de baixa quanto de alta resolucao em disquette para 
posterior recuperacao e uso. 

Os programas em linguagem de maquina podem ser carregados e rodados diretamente, ou 
podem ser chamados por programas em BASIC usando a declarapao CALL ou a funpao USR. 

0 DOS tern tres comandos especialmente projetados para arquivos binarios. Sao eles o 
BSAVE, BLOAD e BRUN. 0 efeito de cada um deles e o mesmo que o de seus equivalentes nao 
binSrios (BSAVE = SAVE, BLOAD= LOAD, BRUN= RUN). 

BSAVE 

BSAVE como o nome indica, guarda a imagem binaria no disco. Aqui vai um exemplo: 

BSAVE NOMLAEG,A378,L21>S6, 02, 02 

Note que existem dois parametros nao encontrados em outros comandos DOS. Veja tambem 
que esses parametros nao sao opcionais; eles devem ser especificados. Os parametros slot, drive e 
volume sao opcionais, como de costume. 

O parametro A e o enderego; ele indica a posicao de memoria inicial da imagem binaria a ser 
guardada. 0 enderego pode ser uma constante decimal ou hexadecimal. Os valores hexadecimais 
devem ser precedidos pelo sinal d6lar ($). Os valores decimals devem estar entre 0 e 65535. Valo¬ 
res negativos sao proibidos. 
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0 parametro L especifica o comprimento da imagem binaria a ser gravada. 0 comprimento e 
expresso em numero de bytes. Pode ser um numero decimal ou hexadecimal, com os valores hexa¬ 
decimal precedidos pelo sinal de dolar ($). 0 comprimento vai de 1 a 32767 ou a mensagem 
SYNTAX ERROR sera gerada. 32767 e o maior tamanho que o DOS pode guardar num unico 
campo. Devem ser dados dois BSAVE para guardar mais de 32767 bytes. 

Se as posigoes de memoria na faixa especificada nao existem fisicamente, nenhum erro e 
devolvido. Nao e muito interessante especificar posigoes fora da faixa de memoria instalada no seu 
Apple II (exemplo, 49151 ou $BFFF em um sistema de 48K bytes). 


BLOAD 

0 BLOAD recupera o conteudo de arquivos binarios e os carrega na memoria. 0 comando BLOAD 
tern a seguinte aparencia: 

BLOAD NOMEARQ,A378,86>D2,06 

0 parametro enderego e opcional no comando BLOAD. Se ausente, a imagem e carregada inician- 
do no enderego especificado quando a imagem foi gravada. 

Os programas em linguagem de maquina podem nao funcionar corretamente se forem carre- 
gados em enderegos de memoria errado. 

Diferentemente do comando LOAD, o BLOAD nao zera programas ou dados a menos que 
eles residam nas posigoes de memoria onde a imagem sera carregada. Apenas aquelas posigoes sao 
afetadas pelo BLOAD; outras posigoes fora da faixa do BLOAD nao sao afetadas. 

Nao e mostrado nenhum tipo de erro se o enderego referenciado para o BLOAD e uma 
area de ROM. A 3rea de ROM no caso nao sera afetada, e claro. 


BRUN 

BRUN e identico ao BLOAD exceto que apos o arquivo ser carregado, o BRUN executa um salto 
em linguagem de maquina para o enderego inicial do programa. Se nenhum enderego e dado, o 
salto e para o enderego dado quando da gravagao do programa. Aqui segue um exemplo do BRUN: 


BRUN NOME ARQ,A378,86, 02 , V6 

Nunca use o BRUN com imagem grafica, pois o resultado e imprevisfvel. 


6 

Graficos e Som 


0 Apple II tem capacidade de vi'deo grafico e gerapao de som. Juntas, essas caracterfsticas dao 
outra dimensao aos programas que se usam e que se escrevem. Este capftulo e dirigido aos inician- 
tes que estao aprendendo BASIC (talvez apenas lendo este livro), bem como a programadores em 
assembler. Os graficos nao sao diffceis de serem montados, especialmente em linguagem de alto 
nfvel. 0 Monitor do Apple II, com suas sub-rotinas em linguagem assembler incorporadas, ajuda 
ainda mais os programadores em linguagem assembler a usarem graficos e o alto-falante interno do 
equipamento. 0 intuito deste capftulo e que, ao termina-lo, tenha-se solidos conhecimentos no 
emprego destes elementos nos programas. 


GRAFICOS de baixa resolucao 


0 Apple II tem duas areas de memoria separadas disponfveis para graficos de baixa resolupao. 
Estas duas ireas sao chamadas paginas. Ambas as paginas podem aparecer na tela como grafico 
de vfdeo com 40 colunas por 48 linhas, como mostrado nr Figura 6.1. 

Cada coordenada (intersepao de linha e coluna) aparece como um pequeno retangulo na 
tela. Cada pagina contem 1920 coordenadas (40 colunas vezes 48 linhas), e pode-se atribuir uma 
das 16 cores a cada coordenada em cada pagina. A Tabela 6.1 mostra os tons disponfveis. Nao e 
necessario conhecer os fundamentos do funcionamento interno do Apple II para usar graficos 
de baixa resolupao; apenas o conhecimento de programapao em BASIC (e um pouco de coorde¬ 
nadas grSficas) e suficiente para iniciar. 
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TABELA 6.1. Cores de Graficos em Baixa Resolupao. 


Cor 

Numero 

Cor 

Numero 

Preto 

0 

Marrom 

8 

Magenta 

1 

Laranja 

9 

Azul Escuro 

2 

Cinza #2 

10 

Purpura 

3 

Rosa 

11 

Verde Escuro 

4 

Verde Claro 

12 

Cinza #1 

5 

Amarelo 

13 

Azul Medio 

6 

Agua 

14 

Azul Claro 

7 

Branco 

15 


MONTANDO A PAGINA GRAFICA 

A pagina dedicada a graficos de baixa resolupao tambem dobra como a pagina de texto para o 
Apple II. Dentro do BASIC, muda-se para modo grafico a partir do modo texto atraves da decla- 
racao: 


GR 

Uma vez executada a declaracao, a tela fica preta a excepao das quatro linhas inferiores da 
tela que recebem texto. Essa area inferior da tela e chamada janela de texto. Com a janela de 
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texto na parte inferior da tela, existe espapo para 40 das 48 linhas dispom'veis no modo grafico 
de baixa resolupao. Pode-se usar esta declarapao mais de uma vez dentro de um programa, mesmo 
estando dentro do modo grafico de baixa resolupao, o que resulta na limpeza da tela. 


Graficos de Tela Inteira 

Apos executar a declarapao GR, pode-se eliminar a janela de texto e permitir que as oito ultimas 
linhas sejam usadas para grafico, digitando: 

POKE -16302,0 

A janela de texto desaparece, substitui'da por area de grafico. 


Refazendo a Janela de Texto 

Se o Apple II estiver no modo grafico total, pode-se fazer voltar a janela de texto de duas formas. 
Para limpar a tela grafica e voltar a janela de texto ao mesmo tempo, use a declarapao GR. Para 
voltar a janela de texto sem alterar as primeiras 40 linhas de grafico, entre a declarapao: 

POKE -16301,0 

Uma vez executada, esta declarapao repoe a janela de texto em baixo da tela. 


Voltando ao Modo Texto em toda a Tela 

Para deixar o modo grafico de baixa resolupao e voltar ao modo texto normal, use a declarapao 
BASIC: 


TEXT 

isso faz voltar de grafico para caracteres. Enquanto a declarapao GR limpa a tela quando executa¬ 
da, o TEXT nao limpa. Lembre-se que texto e grafico usam a mesma area de memoria. Quando 
esta declarapao e executada, provavelmente a tela aparecera cneia de caracteres fmpares; isso e 
porque o Apple II estara interpretando os caracteres graficos como texto. Limpe a tela com a 
sequencia Esc-@, com a declarapao CALL-936 ou, em Applesoft, com o comando HOME. 


DECLARAPOES DE PROGRAMAQAO DE GRAFICOS 

Tanto o Integer BASIC quanto o Applesoft reconhecem comandos graficos de baixa resolupao 
para desenhar coordenadas na tela, trocar as cores usadas nos desenhos, e trapar linhas horizontal 
e verticais de varios tamanhos. Estes comandos operam apenas em graficos de baixa resolupao da 
pagina 1 (tambem chamada pagina primaria). Se for usada a pagina 2, varias dessas declarapoes que 
poupam tempo sao eliminadas e deve-se recorrer as declarapoes nao especfficas, como PEEK, 
POKE e CALL para resolver os problemas. 
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A Declaracao COLOR 

Na Tabela 6.1, cada cor listada tem um numero correspondente entre 0 e 15. Esse e o numero 
usado na declaracao COLOR para indicar a cor atual do grafico de baixa resolucao. Por exemplo: 

COLOR-13 

indica que a cor do desenho sera amarela. Se nao for indicada a cor a ser usada, o Apple II usa o 
preto, equivalente a COLOR=0, a cor adotada por ausencia. Embora se possa especificar um 
numero de cor entre 0 e 255 sem gerar erro de sintaxe, o COLOR toma apenas o nibble de menor 
valor selecionado. Dessa forma, se for dado COLOR : =222 (igual a DE hexadecimal), sera enten- 
dido COLOR = 15 (igual a OE hexadecimal). 


A Declaracao PLOT 

Esta declaracao BASIC coloca um unico ponto grafico — um pequeno retangulo — na tela do 
Apple II na coordenada que se especifica. 

A declaracao: 

PLOT 23,18 

ilumina um ponto na 24? linha e 19? coluna na cor indicada pela ultima declaracao COLOR 
executada. 0 numero da linha vai de 0 a 47 e o da coluna de 0 a 39. Excedendo estes limites na 
declaracao PLOT, aparece uma mensagem de erro, e o programa para. Como em qualquer outra 
declarapao de grafico em baixa resolucao (exceto GR), podem-se trocar expressoes literais por 
variaveis: 


PLOT Y/2+12,X-4 

Um Exemplo de "Plotagem" 

0 exemplo seguinte em Integer BASIC usa todas as declaracoes graficas de baixa resolucao vistas 
neste capi'tulo ate aqui. 0 objetivo e desenhar uma linha diagonal a partir do canto superior 
esquerdo ate o ponto direito mais baixo possi'vel. 

10 REM TP OCA UMA LINHA DIAGONAL 

11 REM PELA TELA EM BAIXA RESOLUCAO 
20 GR 

30 COLOR* P.ND (16) 

40 FOR Y=0 TO 39 
50 PLOT Y,Y 
60 NEXT Y 
70 GOTO 30 

A tela se parecera com a Figura 6.2, a menos da linha diagonal, que mudara de cor aleato- 
riamente. 

Para mudar o programa para Applesoft, troque a linha 30 como visto abaixo. 

30 COLOR* PND (16) *16 
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FIGURA 6.2. Exemplo de Desenho em Baixa Resolupao. 


Trapando Linhas Horizontals 

0 comando HLIN permite desenhar linhas de varios comprimentos da esquerda para a direita na 
pagina grafica de baixa resolupao. Esta declarapao: 

MLIN Or 39 AT 0 

desenha uma linha horizontal na parte mais alta da tela, da margem esquerda ate a margem direita. 
HLIN lembra Horizontal Linha. A forma geral desta declarapao e colocar a coluna esquerda seguida 
por vfrgula, seguida pela coluna mais a direita a ser ocupada pela linha (neste caso 39), a palavra 
AT, e a linha onde sera desenhada a reta horizontal. 

Os numeros de coluna da esquerda e direita colocados nao podem ser negativos e devem ser 
menores que 256; o numero da coluna da direita nao pode ser menor que o da esquerda. 0 para- 
metro a frente do AT nao pode ser negativo nem maior que 48. Se algum desses parametros exce- 
der o limite, aparece uma mensagem de erro, interrompendo a execupao. Se for especificada coluna 
maior que 39 na declarapao HLIN em Integer BASIC podem aparecer resultados imprevistos. 0 
Applesoft fornece uma mensagem de erro. Por exemplo, execute a declarapao: 

10 GR 

20 COLOR- 1 12 
30 HLIN 45*100 AT 0 

Em Integer BASIC, isso causa o aparecimento de duas barras verdes. A primeira barra nao 
esta na linha 0 (a mais alta da tela) como deveria estar, e a barra continua por varias linhas tela 
abaixo. Em geral nao e bom fazer esses valores excederem os limites de posicao na tela em baixa 
resolupao. 
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Tragando Linhas Verticals 

A declaragao VLIN (de Vertical Linha) desenha uma reta na cor selecionada, de uma linha ate 
outra, numa coluna especificada. 

Por exemplo: 

MLIN 12/30 AT 33 

desenha uma reta da linha 12 ate a linha 30, na coluna 33. Os valores dos parametros do VLIN sao 
identicos aos de HLIN: a primeira e segunda expressoes devem ser numeros inteiros entre 0 e 255 
inclusive; o segundo parametro nao pode ser menor que o primeiro, e o ultimo parametro (refe- 
rente ao numero de coluna) deve ser inteiro entre 0 e 39 inclusive. Se qualquer desses parametros 
estiver fora da faixa permitida, aparece uma mensagem de erro na tela do Apple II. 


Usando HLIN e VLIN num Programa 

Urn outro programa (listado abaixo) ajuda a compreender o uso de HLIN e VLIN. Aqui, sao 
tragadas linhas aleatorias em cores aleatorias na tela. Para parar o programa, digite Ctrl-C. 

10 REM USO DE ML IN E HLIN 
20 GR s IJSA PAGINA GRAFICA 1 
30 POKE -16302/Os REM DEI.PAGINA INTEIRA 
40 CALL -1998s REM LIMPA TODAS AS 48 LINHAS 
50 REM INIC10 DO PROGRAMA 

40 COLOR« RND M6>* REM SELEC.COR ALE A TOR IA 
70 HLIN 0/RND <40) A I' RND (48) 

80 COLOR« RND (16) 

90 MLIN Or RND (48) AT RND (40) 

100 GOTO 60 


A Declaragao SCRN 

A declaragao SCRN e um tanto mais sutil que as outras declaracoes em baixa resolugao. Suponha 
que se deseje que o computador informe que cor esta desenhada num certo ponto da tela. 0 SCRN 
faz isso. Esta declaragao: 

X=SCRN<12,24> 

atribua a variave! X o numero da cor na coordenada entre parenteses (neste caso, linha 13 e coluna 
25). A cor devolvida para a variavel esta entre 0 e 15; o numero corresponde a uma das cores 
mostradas na Tabela 6.1. Por exemplo, se forem dadas as seguintes declaragoes em modo imediato: 


GR 

COLOR=14 

PLOT 12,12 

PRINT SCRN (12,12) 
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0 Apple II responder 

14 

Esta declaragao pode ser muito util ao se escrever programas avangados em baixa resolugao. 


GRAFICOS DE ALTA RESOLUQAO 


0 aspecto mais atraente do Apple II e sua capacidade de fazer graficos em alta resolugao. Como no 
caso dos de baixa resolugao, existem duas areas ou paginas disponfveis para uso. Mas e apenas 
nisso que reside a similaridade. A resolugao neste modo e de 280 linhas horizontais por 192 posi- 
goes verticals, um incremento de 7 vezes na vertical e 4 na horizontal sobre o modo de baixa 
resolugao. Entretanto, existe menor numero de cores possi'vel e pode-se desenhar linhas muito 
mais finas na tela. 

As fungoes internas disponfveis para grSficos em alta resolugao existem no Applesoft. 0 
Integer BASIC nao tern comandos especfficos desse tipo. No entanto, nao importandoa linguagem 
usada no Apple II, existe a capacidade grifica de alta resolugao porque o Apple II usa parte da 
memoria para guardar pontos, linhas e formas de alta resolugao, e usa programas internos para 
interpretar e apresentar na tela esses dados. Certas declaragoes internas do Applesoft usam os 
programas internos automaticamente e a memoria da tela; essa parte sera vista em primeiro lugar. 
Mais adiante veremos como incorporar graficos de alta resolugao tambem aos programas em 
Integer BASIC. Como sera visto adiante, existem algumas fungoes de alta resolugao que so sao 
possfveis em Integer BASIC. 


QUE PAGINA DEVE SER USADA? 

Existe alguma dificuldade em se usar graficos de alta resolugao, e elas envolvem a quantidade de 
memoria de que o sistema dispoe. Se estiver sendo usado o Applesoft firmware (isto e, em ROM 
no Apple II Language System), pode-se usar a pagina 1 de alta resolugao se o computador possui 
mais de 16K, e pode-se usar a pagina 2 se o Apple II tern 24K ou mais. Ponha mais 12K se for 
usado o Disk Operating System (DOS) e o grSfico de alta resolugao do Applesoft em conjunto. 

Se for usada a versao do Applesoft em cassette ou disco, nao se pode usar a pagina 1, por 
esse espago ser empregado no interpretador do Applesoft. Ao se tentar usar a pagina grafica 1 
de alta resolugao nesse caso, estara comprometida ou completamente perdida a possibilidade de 
programagao em Applesoft bem como o programa BASIC presentemente na memoria. Pode-se 
usar a pagina 2 se o Apple II tiver pelo menos 24K, ou 36K se o DOS estiver presente ao mesmo 
tempo. 


Reservando Memoria para Graficos de Alta Resolugao 

0 Apple II nao reserva automaticamente espago de memoria para graficos de alta resolugao. A 
medida que o programa vai ficando maior, por aumento do numero de declaragoes ou de varia- 
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veis, a chance de destruir paginas graficas aumenta. A forma de resolver este problema e determinar 
dois ponteiros de memoria, HI MEM: e LOMEM:, os valores que vao proteger a pagina ou paginas 
graficas de alta resolugao usadas. Esses ponteiros agem como limites que o programa nao pode 
ultrapassar, permitindo assim a existencia de ate duas areas de memoria que podem ser usadas 
livremente. 

0 uso do HIMEM: e do LOMEM: difere entre o Applesoft e o Integer BASIC. Veja as dife- 
rengas no compendio de BASIC, localizado no Capftulo 8. Veja tambem a Figura G.1 no Apendice 
G que mostra o uso de memoria em forma de desenho. Os tres paragrafos que seguem ficarao mais 
faceis de serem entendidos se forem observadas essas indicagoes. 

Se for desejado usar pagina grafica de alta resolugao 1 (lembre-se de que e necessario ter-se 
o Applesoft em firmware para isso), tendo apenas urn Apple II com 16K, ponha HIMEM: em 8191 
e nao mexa no LOMEM. Isso fara com que o programa em Applesoft se mantenha abaixo da posi- 
gao de memoria 8191, o que e uma severa porem necessaria restrigao, desde que se necessita 8K 
para memoria grafica de alta resolugao. Se for o caso de se usar pagina 1 num Apple II com mais de 
16K, pode-se tambem nao mexer no HIMEM: e colocar o LOMEM: com 16384. Isso colocarci o 
programa acima da pagina grafica de alta resolugao 1. CUIDADO: Nao use este esquema em 
conjunto com o DOS a menos que o sistema tenha mais de 32 K de memoria. Caso contrSrio, use 
o primeiro esquema, que mantem o programa abaixo da pagina 1. 

Se se deseja usar a pSgina 2 (possfvel apenas com 24K ou mais), ponha LOMEM: em 24576, 
ou HIMEM: em 16383 deixando LOMEM: inalterado. Ajustando LOMEM: coloca-se o programa 
do Applesoft acima da pagina grafica 2. Para usar o DOS ao mesmo tempo, e necessario no mfnimo 
48K de memoria. Se for ajustado o HIMEM: o programa residir^ abaixo da pagina grafica 2. Neste 
ultimo caso, em se usando o interpretador Applesoft nao-firmware (a partir do cassette ou disco), 
o programa em Applesoft ficara no espago acima do interpretador e abaixo da pagina grafica 2, 
que e um espago apertado. 

No caso de usar ambas as paginas para grafico de alta resolugao (possfvel apenas com o 
Applesoft em firmware), ponha LOMEM: em 24576 e HIMEM: em 8191. Se o programa em 
Applesoft e colocado acima das paginas graficas, ajustando o LOMEM: e deixando o HIMEM: 
entao e necessario no mfnimo 48K para usar o DOS e ainda ter uma quantidade de memoria razoci- 
vel para o programa em Applesoft. 


ACESSANDO O DISPLAY GRAFICO 

Embora haja disponibilidade para duas paginas graficas de alta resolugao, o Applesoft em disco ou 
cassette usa parte da pagina 1 para armazenar a linguagem (o interpretador). Tendo o Apple II Plus 
ou o standard, ambos com o cartao Applesoft Firmware ou o Language System, pode-se usar a 
pagina 1 sem receio de alterar o BASIC. Para efeito de compatibilidade com outros computadores 
Apple II, pode-se usar apenas a pagina 2 em qualquer caso. 

Em Applesoft, a declaragao: 

HGR 

limpa a tela e mostra a pagina grafica 1, com quatro linhas de texto na parte baixa. Pode-se ter 
grafico e texto na tela com este modo usando declaragoes PRINT em Applesoft para mostrar 
texto na janela de texto. Entretanto, uma vez executado o HGR pelo Apple II, a tela apenas mos¬ 
tra 160 das 192 linhas graficas horizontais de alta resolugao disponfveis. Para mostrar a tela grafica 
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inteira, execute POKE-16302,0 apos o HGR. Isso eliminara a janela de texto trocando-a pelas 32 
linhas graficas restantes. 

Para mostrar a pagina de alta resolugao 2, use a declarator 

HGR 2 

A execugao do HGR2 limpa a tela e mostra todas as 192 linhas da pagina grafica de alta 
resolugao 2, sem deixar janela grafica em baixo da tela. Para abrir a janela de texto use POKE- 
16301,0 apos o HGR2. A janela de texto e mais diffcil de se usar na pagina grafica 2. 0 texto que 
aparece na janela provem da pagina de texto secundaria. 0 BASIC so pode acessar essa pagina 
atraves de declaragoes POKE (nao via PRINT), o que e um limite. Entretanto, a segunda pagina de 
texto nao e protegida contra escrita no BASIC como a primeira, de forma que e preciso colocar 
LOMEM: em 3071 ou mais. 


ALTERNATIVAS PARA O HGR E HGR2 

A principal desvantagem em se usar HGR e HGR2 e que em se executando qualquer dessas decla¬ 
ragoes limpa-se a pagina grafica de alta resolugao, quer se queira ou nao. Alem disso, essas decla¬ 
ragoes nao estao disponfveis em Integer BASIC. Pode-se usar declaragoes PEEK, POKE e CALL 
para tornar as paginas graficas mais flexfveis, e elas podem ser uteis nao importando qual a lingua- 
gem usada no Apple II. 


Outra Forma de Gerar Display Grafico 

E possfvel ir-se para o modo grafico de alta resolugao sem limpar a tela. Pode-se comparar este 
metodo ao acionamento de chaves. Teoricamente, o que se faz e exatamente isso, numa area de 
memoria reservada, chamada chave de software, que se localizam de -16304 ate -16297 ($C050 
ate $C057). A Figura E.1 do Apendice E ilustra as chaves disponfveis. Para manter essas decla¬ 
ragoes compatfveis com Integer BASIC e Applesoft, usamos a representagao inteira negativa 
dessas posigoes de memoria, (ou seja, —16304 ao inves de 49231). 

Para mostrar a pagina grSfica de alta resolugao 1 sem limpar o conteudo anterior, execute as 
seguintes declaragoes: 

P OK E ~'1 6304 * 0 Entra no modo grafico 

POKE -1 6297 r 0 Entra no modo alta resolugao 

POKE ~1 6300 r 0 Seleciona pagina 1 de alta resolugao 

(Necessario apenas quando se troca da pagina 2 para a 1) 

Tente essas declaragoes em modo imediato como experiencia. 

Para mostrar a pagina 2 de alta resolugao, sem alterar o conteudo anterior, entre as seguintes 
declaragoes: 


POK E -1 6304 ? 0 Necessario apenas se modo grafico ainda nao foi selecionado 
POKE -1 6297 7 0 Necessario apenas se modo alta resolugao ainda nao foi selecionado 
P OKE - 1 6299 / 0 Seleciona pagina grafica de alta resolugao 2 
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BASIC Normal apos Grafico em Alta Resolugao 

Em Integer BASIC, as declaragoes TEXT e GR podem ser insuficientes para limpar a tela. Em usan- 
do a pagina grafica 2, deve-se re-selecionar explicitamente a pagina 1 com uma declaragao POKE- 
16300,0. De outra forma o que se vera sera a pagina de memoria 2 de texto e grafico em baixa 
resolugao. Isso pode ser especialmente confuso em modo texto. 0 teclado parece nao ter funcao 
pois tudo o que se digita vai para a pagina de memoria 1, enquanto o que esta sendo mostrado e 
a memoria da pagina 2. 

A declaragao GR nao mudou de alta para baixa resolugao grafica em Integer BASIC. Ela 
apenas seleciona modo grafico com a janela de texto de quatro linhas (em oposigao a modo texto 
inteiro). Deve-se selecionar explicitamente grafico em baixa resolugao com uma declaragao POKE- 
16298,0. 


Limpando as P5ginas de Alta Resolugao 

Usando graficos de alta resolugao em Applesoft, HGR e HGR2 limparao a pagina sempre que a 
declaragao e executada. Entretanto, sob Integer BASIC nao ha declaragao simples que execute 
esta fungao. A sub-rotina seguinte usa uma fungao interna do Monitor para limpar a tela de alta 
resolugao: 


1 899 0 R E M * *• * * * * * *•**•* * * k * «• * * * *:• * * *• *:•*: *• # « « « * *• * # «•* 


18991 REM * LIMPA TELA DE ALTA RE80LUCAO * 

18992 REM * (USA SUBROT INA "MOVE" DO MONITOR * 

18993 REM * EM *FE2C PARA MOVER DADOS RAP IDA- * 

13994 REM * MENTE PELA AREA DE ALTA RES0LUCA0 * 

18995 REM * -. * 

18996 REM * ENTRE EM PAGINA 1 OU 2? A R0TINA * 

18997 REM * PAZ 0 RE8T0- * 


1 8998 R E M **********# * * * * n * * * * * * * * *• * *• *• * * * *• * * k w- * 
19000 INICIO ~32 

19010 IF PAGINA-2 THEN INICIO-64 

19020 POKE 60,0 

■19030 POKE 61, INICIO 

•1904G POKE 62,254 

19050 POKE 63,INICIO+33 

19060 POKE 66,1 

19070 POKE 67,INICIO 

19080 POKE -16304,0 

19090 POKE -16297,0 

19100 IF PAGINA--1 THEN POKE -16300/0 
19110 IF PAGINA= :: 1 THEN POKE -16299,0 
1912 0 P0 K E INIC10*256,0 
19130 CALL -468 
19140 RETURN 


Esta sub-rotina em BASIC move zeros para a pagina grafica em alta resolugao selecionada. 
Se a variavel PAGINA e posta em 1, a sub-rotina limpa a pagina 1; se posta em 2, a pagina 2 e 
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limpa. Esta rotina funciona apenas em Integer BASIC; entretanto, nao considere isso uma des- 
vantagem. 0 Applesoft executa esta fungao de forma muito mais eficiente com HGR e HGR2. 


CORES EM ALTA RESOLUQAO 

Sao disponfveis oito cores em modo gr^fico de alta resolugao, porem apenas quatro cores dife- 
rentes sao permitidas, mais o preto e branco. A Tabela 6.2 mostra essas cores e seus numeros 
correspondentes (usados na selegao da cor). 


TABELA 6.2. Cores Graficas em Alta Resolugao. 


Cor 

Numero 

Cor 

Numero 

Preto 

0 

Preto 

4 

Verde 

1 

Laranja 

5 

Violeta 

2 

Azul 

6 

Branco 

3 

Branco 

7 


A Declaragao HCOLOR 

A declaragao HCOLOR do Applesoft seleciona uma das oito cores disponfveis para uso em alta 
resolugao. Diferente da declaragao COLOR em graficos de baixa resolugao (que permite especi- 
ficar numeros maiores que aqueles alocados para cores), o HCOLOR nao aceita cor maior que 7. 
Se uma cor fora do limite e especificada, o programa para abruptamente com a mensagem 
7ILLEGAL QUANTITY ERROR. 0 HCOLOR nao troca a cor de graficos ja presentes na tela, 
nem tern qualquer efeito em graficos de baixa resolugao. 


Determinando a Cor de Fundo em Alta Resolugao 

Com uma pequena modificagao, a sub-rotina apresentada antes de limpa a tela ira preenche-la 
inteiramente com uma das cores disponfveis. A sub-rotina abaixo faz isso. Antes de cham3-la, 
determine a pagina grafica atraves do uso da variavel PAG IN A. Ainda, determine o numero da cor 
pela variavel HCOR. O programa que chama deve atuar nas chaves de software para modo grafico 
de alta resolugao. Esta sub-rotina opera apenas em Integer BASIC. 


18990 

REM 

■1 8991 

REM 

•1 8992 

REM 

18993 

REM 

18994 

REM 

•18995 

REM 

18996 

REM 

18997 

REM 


* xxxxxxxxxxxxxxxxxxxxx 


* GERA COR DE FUNDO * 

X ---- X 

X: DET. PAGINAL 0U 2 * 

* E HCOR COM A COR * 

* equivalents: do * 

*• APPLESOFT- * 


XX XXXXXX xxxxxxxxxxxxxx 
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19000 INICIO-32 

19010 IF PAGINA=2 THEN I NIC10= 6 4 

19020 POKE 60,0 

19030 POKE 61/INICIO 

19040 POKE 62,253 

1 9 0 50 P 0 K E 6 3,1NIC10+3 3 

19060 POKE 66,2 

19070 POKE 67,1NICIO 

19075 Y1“85s XI=42 

19080 IF HCOR >0 AND HC0RO4 THEN 1 9090s XI =0 : Y1 =0 

19090 IF HC0RO3 AND HC0RO7 THEN 19100: XI =127: Y1 =127 

19100 IF HC0R=1 OR HC0R=5 THEN 19120 

1911 0 X 3=X1 5 X1- Y1 : Y1 = X 3 

19120 IF HCOR<4 THEN 19140 

1 913 0 Y1 = Y1 + 1 2 8 " X1 = X1 +12 8 

19140 POKE INICI0*256,XI 

1 915 0 P 0 K E IN l C10 * 256+1 , Y1 

19160 IF P AG I NA r:: '1 THEN POKE -16300,0 

19170 IF PA6INA=2 THEN POKE -16299,0 

19180 CALL -468 

19190 RETURN 


DESENHANDO PONTOS E LINHAS 

Uma vantagem poderosa dos graficos de alta resoluqao em Applesoft e sua habilidade de desenhar 
linhas de qualquer angulo bem como pontos isolados e linhas horizontais e verticals. A declaraqao 
HP LOT pode ser usada de tres formas: 

HPLOT 12,12 

Isso desenha urn ponto na pagina de alta resoluqao corrente na interseqao da decima-terceira linha 
com a decima-terceira coluna, na cor de alta resoluqao selecionada. 

O segundo uso do HPLOT e: 

HPLOT 0,0 TO 279,191 

Esta declaragao desenha uma linha diagonal do ponto mais alto a direita at6 o mais baixo canto a 
esquerda na tela. Usando HPLOT com dois conjuntos de coordenadas como mostrado acima, pode- 
se desenhar uma linha de urn ponto a outro da tela. 0 terceiro tipo 6 mais sofisticado: 

HPLOT 0,0 TO 279,0 TO 279, 191 TO 0,191 TO 0,0 

Esta versao do HPLOT so opera na versao firmware do Applesoft. As versoes em disco e cassette 
nao permitem esta forma de HPLOT. Aqui se pode definir multiplas declaraqoes do HPLOT 
facilmente. Todos os segmentos sao desenhados na mesma cor. Isto pode ser util ao se desenhar 
formas de vSrios lados. 
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Alternativas ao HPLOT 

A sub*rotina listada abaixo permite programar graficos de alta resolugao em Integer BASIC, sem 
necessidade de comutar paginas. Esta rotina pode ser util, embora seja lenta em vista de todos os 
cSIculos serem feitos em BASIC. Para usa-la passe as coordenadas X e Y do ponto desejado. Certifi- 
que-se que PAGINA contem a pagina desejada. Fica a seu cargo determinar os modos de alta 
resolugao, grafico e tela cheia. Isso permite flexibilidade adicional. Se e permitido usar esta rotina 
sem indicar antes o modo de alta resolugao, a sub-rotina operarS na memoria de alta resolugao, 
mas sem modificar a tela. Em seguida, depois do programa modificar a area de memoria, ele podera 
entrar em modo grafico de alta resolugao com uma serie de declaragoes POKE (como foi descrito 
antes) e toda a operagao de desenho leva a efeito fora de cena aparecera subitamente. Isso permite 
ao programa apontar a pagina 2 enquanto mostra a pagina 1 e vice-versa. 

20000 REM ************************************* 

20001 REM x- DESENHO EM INTEGER ALTA RESOLUCAO * 


20002 REM * ..—----- * 

20003 REM * INDIQUE X=C0LUNA* Y-LINHA , « 

20004 REM * PAGINAL OU 2? USA AS VARIAVEIS * 

20005 REM * YlrXI E X3 * 


2 0 0 0 6 R E M ** ft * * * * * * * * ¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥: ¥: ¥: ¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥ ¥ *** 
20007 REM 

20010 Y1~ : PAGINA*8192: REM DET. ENDERECO BASE 

20020 Y1 *Y1 + (Y/ 6 4)*40+<Y MODS)*1024 

20030 Y1 Y1 + < Y MOD 64/8 ) *128+X/7 

20040 XI=PEEK <Y1)s REM LE NO BYTE ALTA RESOL. 

20050 X3«2 rt <X MOD 7) 

20060 REM 7 OR 7 DO BIT EM XI COM 

20070 REM 0 VALOR DO BIT EM X3 

20080 IF XI MOD <X3 2)< *3 THEN X1=X1+X3 

20090 POKE Y1/X3 

20100 XI * PEEK ( Y1) 

21010 X3 « 2 '' (X MOD 7) 

21020 IF XI MOD <X3*2XX3 THEN X1«X1+X3 

21025 X3 « 2 (X MOD 7) 

21026 GOTO 21100 
21030 POKE Y1/X3 
21040 RETURN 
21100 POKE Y1 / X.3 
21130 RETURN 
25000 60SUB 19000 


Um Exemplo de Alta Resolugao em Integer BASIC 

0 programa seguinte usa duas das sub-rotinas recentemente introduzidas para desenhar pontos em 
telas de alta resolugao. Controladores de jogos determinam a coordenada a desenhar. Rodando os 
controladores, obtem-se linhas na tela. 
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10 REM ESTE PROGRAMA USA RQTINAS 
20 REM ESPECIAIS PARA LIMPAR E DESENHAR 
30 REM EM GRAFICOS DE ALTA RESOLUCAO 
40 REM USE CTRL-C PARA FINALIZAR 

89 REM GERA MODO GRAF ICO 

90 POKE -16304,0 

99 REM GERA GRAF ICO DE ALTA RESOLUCAO 
100 POKE -16297,0 

109 REM DETERM.GRAFICO EM TODA A TELA 

110 POKE -16302,0 
200 PAGIMA-2 

204 REM LIMPA MEMORIA DE ALTA RESOLUCAO 

205 GOSUB 19000 

209 PEGA COCRDENADAS DOS PONTOS 

210 X- : PDL. < 1 ) 

220 Y« PDL (0) 

229 REM DESENHA PONTO DE ALTA RESOLUCAO 
23G GOSUB 20010 

239 REM PEGA MAIS COORDENADAS 

240 GOTO 210 
250 END 

Para uma variagao interessante deste programa, tente usar a sub-rotina que preenche a tela de uma 
cor ao inves de limpar a tela. 

Tente melhorar o programa verificando os botoes do controlador de jogo com declaragoes 
POKE, e limpando a tela a cada vez que o botao e acionado. 


USANDO FORMAS EM ALTA RESOLUQAO 

Juntamente com desenhos e tragos, o Apple II permite definir desenhos e manipular formas de 
duas dimensoes em modo grafico de alta resolugao. Esta segao ensina como criar, projetar e usar 
uma forma sob o Applesoft. Tanto quanto possfvel, esta segao apenas inicia a exploragao das pos- 
sibilidades de criagao que sao abertas. 

Ate agora vimos como gerar urn programa que desenha graficos em alta resolugao que faga 
figuras geometricas. Quern operou com esses programas provavelmente encontrou alguma dificul- 
dade em manipular as figuras na tela. Por exemplo, pode*se desejar rodar uma figura sobre urn 
eixo, ou faze-la aparecer maior ou menor na tela. As formas em alta resolugao tern essas possibi- 
lidades. 


DEFININDO FORMAS 

As formas em alta resolugao requerem planejamento. Em essencia, faz-se mais que dizer ao compu- 
tador para desenhar uma linha do ponto A ao ponto B. Usando formas no Apple II, descreve-se 
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inteiramente a figura antes de orientar o computador para desenha-la. Definem-se formas em alta 
resolucao numa tabela de formas, chamada assim por confer as caracterfsticas codificadas da figura 
a ser desenhada. 0 primeiro passo para definir uma forma de alta resolucao e desenhar a propria 
forma num papel. Pegue o exemplo de desenhar um quadrado, que consiste de quatro linhas 
de igual tamanho, cada uma fazendo um angulo reto com a outra previamente desenhada. 


A tabela de forma contem instrupoes codificadas para desenhar uma figura; essas instrucoes 
sao chamadas vetores de desenho. Cada vetor descreve movimento de subida, descida, direita, 
esquerda, e ainda se o desenho vai para a tela ou nao. Pode-se interpretar cada lado do quadrado 
ilustrado acima como uma diregao a desenhar: um para cima, um para a direita, um para baixo e 
um para a esquerda. Essa e a forma pela qual as rotinas de manipulacao de formas do Applesoft 
ve as figuras. 

Figuras sao mais diffceis de se desenhar, se contem linhas diagonals ou curvas. Um triangulo, 
apesar de ter um lado a menos que o quadrado, envolve muito mais trabalho porque contem no 
minimo uma linha diagonal. As linhas quebradas na ilustragao abaixo indicam movimento sem 
desenho (vetores fantasmas): 



/ 

Si 

i 




1 


/ 

\\ / 
1 

1 

1 

\\ 

1 

l 

-> 

1 

1 

*—> 

1 

1 

■ i ^ 

*-> 


Desde que se pode apenas definir uma forma com vetores que movem para cima, baixo e 
lados, algumas formas, como os ci'rculos, podem nao ser nem aproximados. Em tais casos pode 
ser mais facil desenhar formas complicadas com o HPLOT ao inves de usar tabela de formas. 


MONTANDO A TABELA DE FORMAS 

A figura desenhada em papel deve ser convertida em vetores de desenho. Esta secao mostra como 
fazer a conversao. A segao seguinte mostra um programa em Applesoft que faz a conversao. 
Assim pode-se pular para a secao seguinte se nao houver interesse em saber como as tabelas de 
formas funcionam internamente. 

Os codigos dos vetores tern valor entre 0 e 7; cada bit numa definicao de forma (parte da 
tabela de forma) pode ter ate tres vetores. A Tabela 6.3 mostra os codigos de vetores possfveis. 
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TABELA 6.3. Vetores de Desenho e seus Codigos Binarios. 


Sfmbolo 

Apao 

Codigo Binario 

Codigo Decimal 

t 

Move para cima sem desenhar 

000 

0 


Move para direita sem desenhar 

001 

1 


Move para baixo sem desenhar 

010 

2 

«- 

Move para esquerda sem desenhar 

011 

3 

t 

Move para cima desenhando 

100 

4 

-> 

Move para direita desenhando 

101 

5 


Move para baixo desenhando 

110 

6 

4 - 

Move para esquerda desenhando 

111 

7 


Uma vez que a forma foi reduzidtf a um conjunto de vetores, eles podem ser colocados na memo- 
ria, onde certos comandos em Applesoft os decodificam e desenham a forma. 

Peque um ponto inicial da forma. Faca uma lista de vetores de desenho necessarios para 
construf-la, usando flechas (t, 4, -►). Liste os vetores na ordem em que aparecem na forma 
(em direpao aos ponteiros do relogio ou ao contrario, tanto faz). Marque qualquer vetor que deva 
ser gerado mas nao desenhado (vetores fantasmas). Iniciando no canto inferior esquerdo, nosso 
quadrado corresponde a estes vetores: 


Direpao 

Desenho 

t 

Sim 

-> 

Sim 


Sim 


Sim 


Agora, escreva o cddigo binario na frente de cada vetor (use a Tabela 6.3 para converter). 
Obtem-se o seguinte: 


Vetor 

Codigo 

t 

100 

-* 

101 


110 

4 - 

111 


Como mostrado na Tabela 6.4, cada byte da tabela de formas contem tres partes, cada uma 
das quais pode conter um vetor de desenho. Veja que as partes 1 e 2 contem tres bits cada e a 
parte 3 contem apenas 2 bits. 
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TABELA 6.4. Byte da Tabela de Formas. 


Bit 

Parte 3 

Parte 2 

Parte 1 

7 

6 

5 

4 

3 

2 

1 

0 

M = bit de movimento 

P = Desenha ou nao 

M 

M 

P 

M 

M 

P 

M 

M 


Olhando a Tabela 6.3, pode-se ver que alguns dos codigos usados para desenhar sao numeros 
de 3 bits. Isso e correto para as partes 1 e 2 de cada byte de definipao de forma, cada uma das 
quais tern tres bits. Na parte 3, por ter apenas 2 bits, ela so pode ter certos vetores de desenho. Os 
vetores permitidos na parte 3 sao direita, esquerda, cima e baixo sem desenho. Nao sao reconhe- 
cidos outros vetores na parte 3. 

A maioria das vezes a parte 3 nao e usada. Isso nao significa que se possa esquecer de usa-la 
para compor o todo, mas na maioria das vezes pode-se faze-lo. Se a parte 3 da definicao de forma e 
deixada em zero, o Applesoft a ignora, indo para o byte seguinte e interpretando-o para compor o 
desenho. 

0 vetor de desenho como zero pode significar duas coisas. Na parte 3 de cada definipao de 
forma, um vetor de desenho a zero sempre significa "sem movimento e sem desenho". Entretanto, 
na Tabela 6.3, um vetor zero significa "mover para cima sem desenhar". Essa ambiguidade pode 
causar problemas nas partes 1 e 2 em cada byte de definicao de forma, porque sob certas circuns- 
tancias o Applesoft ignora vetores de desenho em zero, e em outras ele executa movimento para 
cima sem desenhar. A regra aqui e nunca terminar um byte de definicao de forma com um vetor 
de desenho em zero, se for desejado que esse vetor represente "movimento para cima sem dese¬ 
nhar". As rotinas de manipulapao de formas do Applesoft assumem que se a porcao mais signifi- 
cativa (parte 3) ou as duas mais significativas (2 e 3) sao zero, nao e executada nenhuma acao de 
desenho. 

Se todas as tres partes do byte de definicao de forma estiverem em zero, o Applesoft inter- 
preta como sinal de "fim da definicao de forma". De fato, deve-se terminar cada definipao de 
forma com um byte de terminacao, igual a zero. De outra forma o Applesoft continua apos o fim 
da definipao da forma original, ate encontrar um byte em 0. 

Pode-se usar o vetor de "movimento para cima sem desenho" pois um vetor de desenho vem 
depois dele no mesmo byte. Por exemplo, a parte 2 pode ser posta em 0 (que significa "mover 
para cima sem desenhar) e se a parte 3 e deixada em 01, 10 ou 11 (binario), a parte 2 sera inter- 
pretada como "mover acima sem desenhar". Se a parte 3 e deixada em 0 e a parte 2 tambem, nao 
ocorre nenhum movimento e o Applesoft vem na parte 1 do byte seguinte para procurar o vetor 
de desenho valido seguinte. 

Contando com esse conhecimento, pode-se agora montar os vetores de desenho em codigo 
binario para cada segmento da forma em grupos de dois ou tres. Dessa forma, transformam-se os 
codigos dos vetores de desenho de tres bits para oito bits que podem ser guardados em memoria. 
Os vetores de desenho para o mapa do quadrado nas suas definicoes da forma sao mostradas 
na Tabela 6.5. 

Com a forma agora mapeada em bytes em codificacao binaria, pode-se facilmente converter 
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TABELA 6.5. Codificando a Tabela de Formas (Square Shape). 



Vetores 

Codigos Binarios 

Codigos Hexadecimais 

Pte. 1 

Pte. 2 

Pte. 3 

Pte. 1 

Pte. 2 

Pte. 3 

Byte 0 

Nada 

t 

->■ 

00 

100 

101 

25 

Byte 1 

Nada 


■<- 

00 

110 

111 

37 

Byte 2 

Nada 

Nada 

Nada 

00 

000 

000 

00 

Byte 3 

- 

- 

- 

- 

- 

- 

- 


cada byte para notacao hexadecimal. 0 Apendice J contem uma tabela de conversao de binario 
para hexadecimal. A Tabela 6.5 mostra a codificagao hexadecimal do quadrado. 

A definigao de forma agora esta completa. 0 proximo passo e criar uma serie de apontadores 
para essa forma (e outras - ate 255 formas) que o Applesoft usa como diretorio. 


Montando o Diretorio da Tabela de Formas 

0 diretorio da tabela de formas e uma serie de bytes que descrevem quantas formas existem na 
tabela, e tambem aponta cada definigao de forma na tabela. 0 primeiro byte do diretorio contem 
o numero total de formas da tabela. Este numero vai de 0 ate 255 ($FF). 0 segundo byte nao e 
usado e pode ser colocado em zero. 

Os bytes restantes no diretorio contem apontadores para cada definigao de forma existente 
na tabela. Cada apontador tern dois bytes de comprimento e contem o deslocamento (distancia 
absoluta em bytes) da forma a partir do infcio do diretorio. 0 byte de menor ordem do apontador 
precede o de maior ordem. Por exemplo, se o deslocamento em uma forma e 10 bytes, codifica-se 
em hexadecimal como 0A00. No caso do quadrado, existe apenas uma forma para listar no dire¬ 
torio, de forma que o deslocamento da forma 1 para o diretorio e quatro bytes. Assim, 0400 
vai para essa parte do diretorio. 


Bytes 


0 

01 

-Numero de formas da tabela 

1 

02 


2 

04 j 

Deslocamento da forma 1 do byte 0 

3 

00 1 

(byte de menor ordem primeiro) 

4 

25 | 

-Definigao da forma 

5 

37 1 

6 

00 

-Forma termina com 00 
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1 

o 

LL 

a) 

TJ 



Q 


1 

o 

LL 

« 

J2 

£ 

ro 


Deslocamento 


0 

1 

2 

3 


2/ + 2 

2/ + 3 

2/ + 4 


Niimero de formas 
na tabela (0-$FF) 


Nao usado 
(em zero) 


Deslocamento da 
forma 1 

(byte de menor ordem) 


Deslocamento da 
forma 1 

(byte de maior ordem) 


Deslocamento da 
forma /' 

(byte de menor ordem) 


Deslocamento da 
forma / 

(byte de maior ordem) 


Vetor de desenho 
da Forma 1 


00 


Vetor de desenho 
da Forma i 


O comprimento desta parte 
depende do numero de 
formas na tabela 
(2 bytes para cada uma) 


Termina«pao da forma 
sempre com 00 


FIGURA 6.3. Organizacao da Tabela de Formas. 
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£ uma boa pr^tica deixar espago extra em bytes no fim do diretorio da tabela de forma 
para dar espago para apontadores de tabelas futuros. Se nao existe espago no final do diretorio 
para permitir expansao, ser3 necessario reorganizar a tabela de forma inteira quando houver um 
novo apontador de forma para inserir. Mesmo que so se necessite um diretorio contendo dez 
formas, deve-se deixar espago livre no final do diretorio; 20 bytes extra permitem mais dez aponta¬ 
dores de formas para uso posterior. Quando for necessario colocar mais uma forma na tabela, 
coloque a nova definipao apos a ultima feita na tabela, calcule o deslocamento para a nova forma a 
partir do infcio do diretorio, coloque o novo apontador imediatamente apos o apontador da ultima 
forma do diretorio, e some 1 ao byte 0 do diretorio (que contem o numero total de formas na 
tabela). 

A Figura 6.3 ilustra o modo como as tabelas de formas e seus diretorios sao organizados na 
memoria. 


Montando Vetores por Computador 

0 programa seguinte, em Applesoft, monta uma definipao de forma. Ele pede que se digite cada 
vetor de desenho e se ele deve ou nao ser desenhado. Apos digitar o ultimo vetor, digite "F" (de 
FIM) e acione RETURN. 0 programa pergunta se algum vetor deve ser alterado. Caso tenha havido 
algum engano durante a digitagao de um vetor, digita-se novamente. 

Quando nao houver mais corregoes, digite 0 em resposta a VETOR PARA ALTERAR 
(0=FIM). Apos alguns segundos, os vetores de desenho sao apresentados em notapao hexadecimal. 
Aqui est3 uma listagem do programa e um exemplo de sua atuapao: 


1 REM ********************************* 

2 REM * PROGRAMA DE CRIACAO DE FORMAS * 

3 REM ********************************* 

10 DIM SI(100)* VI(100) 

20 1 = 0 

30 PRINT "CRIACAO DE VETORES DE FORMAS" 

A0 PRINT 

41 REM DIGITACA0 DAS AC0ES DOS VETORES 
50 V « is GOSUB 270 

58 REM DIGITA-SE ATE M$ 

59 REM SER I GOAL. A0 VALOR "F" 

60 IF M$ <> "F" THEN SKI) « Ms I = I + is GOTO 50 

70 PRINT 

71 REM PERMITE CORRECOES 

80 INPUT "VETOR PARA MODIFICAR <0=FIM):"?M 

90 IF V > 0 THEN V = V ~ isGOSUB 270:SKV) * MsGOTO 80 

99 REM C0L0CA VETORES NO ARRANJ0 V*1 < ) 

100 FOR V K TO I 

110 IF B = 2 AND SKV) > 0 AND S1(V) < 4 THEN 140 

120 IF B < 2 AND (SKV) > 0 OR S1(V) > 4) THEN 140 

130 B * 0: 0 = Q + 1 
140 VI <Q> * VI (Q) + SKV) * (8 B) 
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150 

160 

170 

179 

180 
190 
200 
210 
220 
230 
240 
250 
260 

269 

270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
1RUN 


B « B + 1 

IF B >2 THEN B a 0:Q a Q + 1 
NEXT V 

REM MOSTRA VETORES COMO NUMEROS HEXADECIMAIS 
PRINT "BYTE"' r "VETOR " 

FOR V a 0 TO 0 

H% a VI(V) / 16 

LX a vi<V) ~ H% # 16 

IF HX > 10 THEN HX a HX + 7 

IF LX > 10 THEN LX == LX + 7 

PRINT V r CHR$ (HX + 176)? CHR$ (LX + 176) 

NEXT 0 

END 

REM SUBROTINA DE ENTRADA DO VETOR 
PRINT "VETOR "?V + 1?":"? 

INPUT "MOOIMENTO? C/B/E/D? "?M$ 

M a 0 

IF M$ a "D" THEN M = 1 

IF M$ a "B" THEN M = 2 

IF MT> a "E" THEN M = 3 

IF M$ a "F" THEN RETURN 

INPUT "DESENHO (S=SIM,N=NAO)? "?P$ 

IF P* a ~S" THEN M a M + 4? RETURN 
IF P* a "N" THEN RETURN 
GOTO 340 


CRIACAO DE VETORES DE FORMAS 
VETOR 1sMOVIMENTO: C/B/E/D? B 
DESENHO < S-SIM x N=NAO)? N 
VETOR 2SMOVIMENTO? C/B/E/D? B 
DESENHO (S-SIM * N-NAO)? N 
VETOR 3:MOVIMENTO: C/B/E/D? E 
DESENHO (S-SIM/N-NAO)? S 
VETOR 4SMOVIMENTO: C/B/E/D? E 
DESENHO (S “ SIM r N ::: N A 0) ? S 
VETOR 5 s MOVIMENTO: C/B/E/D? C 
DESENHO (S~SIM,N~NAO>? N 
VETOR 6:MOVIMENTO: C/B/E/D? C 
DESENHO (S-SIM r N=NAO)? S 
VETOR /SMOVIMENTO: C/B/E/D? C 
DESENHO <SaSIMyN~NAO)? S 
VETOR 8SMOVIMENTO: C/B/E/D? C 
DESENHO <S«SIM,N«NAO>? S 
VETOR 9sMOVIMENTO: C/B/E/D? D 
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DESENHO <S=SIMtN=NAO)? N 
OETOR 10s MOOIMENTOs C/B/E/D? D 
DESENHO <S=:SIMrN^NAO)? S 
OETOR 11sMOOIMENTOs C/B/E/D? D 
DESENHO < S~SIM 7 N-NAO)? S 
OETOR 12 s MOOIMENTOs C/B/E/D? D 
DESENHO <S=:SIM,N==NAO>? S 
OETOR 13s MOOIMENTOs C/B/E/D? B 
DESENHO < S^SIh * N==NAO ) ? N 
OETOR 1 4s MOOIMENTOS C/B/E/D? B 
DESENHO < S= : SIM r N”NAO)? S 
OETOR 15sMOOIMENTOS C/B/E/D? B 
DESENHO (S-SIM 7 N-NAO)? S 
OETOR 16sMOOIMENTOs C/B/E/D? B 
DESENHO (S- SIM 7 N=~NAO) ? S 
OETOR 17s MOOIMENT0 s C/B/E/D? E 
DESENHO <S==SIM7N^NA0)? N 
OETOR 18sMOOIMENTOs C/B/E/D? E 
DESENHO ( S SIM / N N A 0) ? S 
OETOR 19sMOOIMENTOs C/B/E/D? F 

OETOR PARA MODIFICAR <0~FIM)sO 
BYTE OETOR 

0 12 

1 3F 

2 20 

3 64 

4 2D 

5 15 

6 36 

7 IE 

8 07 

9 GO 

3 


ENTRANDO A TABELA DE FORMAS 

Antes de rodar as formas digitadas, deve-se coloc3-las na memoria do computador. Para isso e 
necessario determinar em que Srea de memoria a tabela vai ficar. A maneira mais facil de criar 
essa Srea reservada e colocar o HI MEM: em urn valor imediatamente abaixo do DOS ou antes 
da pagina grafica de alta resolugao usada. Deve-se operar o HI MEM: antes de executar qualquer 
declaragao em Applesoft que opere com cordoes. Em se usando Applesoft com disco, sao neces- 
sarios no rm'nimo 36K de memoria (embora 48K seja melhor) para permitir o interpretador 
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Applesoft e o DOS. Os enderegos 115 e 116 ($73 e $74) contem o ultimo HI MEM: determinado 
para o Applesoft, com o byte menor armazenado antes. Para calcular o novo valor do HI MEM: 
que libere area para a tabela de formas, use a seguinte declaragao: 

PRINT PEEK<116) * 256 + PEEK<115) - X 

Esta declaragao calcula o valor de HIMEM: a ser usado baseado no parametro X, que e o 
comprimento da tabela de forma, incluindo diretorio. Usando esta declaragao, troque X pelo 
comprimento da tabela. Coloque HIMEM: no valor calculado antes de colocar a tabela na memo- 
ria. Isso a protegera de ser suja pelo Applesoft. 

Como alternativa, pode-se colocar a tabela na memoria entre as posicoes 768 e 975 ($300 
e $3CF) inclusive. Cuidado para nao haver conflito com qualquer sub-rotina em linguagem de 
maquina colocada la anteriormente. 

Pode-se usar a declaragao POKE para colocar a tabela de forma na memoria. Por exemplo, 
a seguinte serie de declaragoes POKE coloca a tabela de formas do nosso quadrado na memoria 
iniciando na posigao 768: 

3POKE 768/01 
;ipoke: 76?, go 

3POKE 770,04 
3P0KE 771/00 
3P0KE 772,37 
3POKE 773,55 
3POKE 774,00 

Pode-se tambem entrar a tabela atraves do Monitor. Use a declaragao CALL-151 para pular 
ao Monitor. Entre entao o enderego "hexadecimal" da memoria onde a tabela iniciara, seguido por 
dois pontos, digite o primeiro byte do diretorio da tabela, um espago em branco, o byte seguinte 
do diretorio, outro espago etc. Acione RETURN. Digite entao outra vez dois pontos seguido pelos 
bytes em hexadecimal da primeira forma da tabela (separando os bytes com espagos), e acione 
Return. Repita este ultimo passo para cada forma do diretorio. Pode-se rever o trabalho digi- 
tando o enderego inicial da memoria, dois pontos, e o enderego final da tabela, acionando RETURN. 
Para maiores informagoes de como usar o Monitor, veja o Capftulo 7. A tabela para o quadrado 


e digitada assim: 




3CALL -151 

* 



Entrada do Monitor 

*6000:01 00 

04 

00 

Entrando o diretorio da tabela de formas 

*:2C 3E 00 



Entrando a forma 1 

*6000.6006 
6000- 01 00 

04 

00 2C 3E 

Verificando o novo conteudo da memoria 

00 


# 


A tabela de formas agora esta na memoria. A primeira entrada comega com o enderego 
inicial da tabela (neste caso $6000). Os dois pontos dizem ao Monitor para colocar uma serie de 
dfgitos hexadecimais na memoria. Imediatamente apos os dois pontos vem o diretorio da tabela: 
01 (o numero de formas da tabela), 00 (o segundo byte nao e utilizado), 04 e 00 (o deslocamento 


GRAFICOS E SOM 


219 


da forma 1 a partir do infcio do diretorio — o byte de menor ordem vem primeiro). A linha seguin- 
te inicia com dois pontos; nao e necessario nenhum enderego inicial se ele foi indicado na entrada 
anterior. 0 Monitor vai colocar a proxima serie de di'gitos hexadecimais imediatamente seguinte 
a primeira serie entrada. 

A ultima linha diz ao Monitor para mostrar os enderegos de memoria de $6000 a $6006. 
0 formato deste comando e: endereco inicial, seguido por dois pontos (que diz ao Monitor para 
mostrar memoria), seguido pelo enderego final. Verifique cuidadosamente o que foi entrado cada 
vez que usar o Monitor para digitar tabelas de formas. 


Guardando a Tabela de Formas em Fita ou Disco 

Apos se gastar um bom tempo montando tabelas de forma, certamente e uma boa ideia guardar 
esse trabalho em algum meio magnetico ao inves de perde-lo quando se desligar o Apple II. Pode-se 
usar cassette ou disco para tal fim; o disco e preferi'vel porque guarda e recupera os dados muito 
mais rapidamente que a fita. 

O Applesoft tern um comando chamado SHLOAD que opera exclusivamente com fitas. 
Antes de jogar a tabela de formas na fita, deve-se calcular seu comprimento (em bytes, hexade¬ 
cimal). Continuando com o nosso exemplo do quadrado, conte o numero de bytes usados 
na tabela; o comprimento total e 7 bytes. Usando o Monitor, entre com o comprimento da tabela, 
iniciando no enderego 0: 

*00207 00 

Como sempre acontece com quantidades de dois bytes entradas pelo Monitor, o byte de me¬ 
nor ordem vem primeiro. Rebobine a fita ate o irn'cio. Ligue no modo RECORD. O Monitor sera 
usado para gravar o comprimento da tabela e ela mesma. Isso e feito em duas operacoes de gra- 
vagao, que podem ser comandadas na mesma linha: 

*0.1W 6000.6006U 

O primeiro comando de escrita coloca o comprimento da tabela (colocado nos enderegos 0 e 1 
da memoria) na fita. A segunda operagao coloca os sete bytes da tabela do enderego $6000 ate 
$6006, na fita. As duas operagoes em conjunto demoram cerca de 20 segundos. O falante emite 
sons por duas vezes durante o processo de gravagao. Apos o segundo bip, pare o gravador. A 
tabela entao estara gravada na fita para uso posterior. Use o tamanho, enderego inicial e enderego 
final da sua tabela ao inves destes do exemplo. 

Ao usar o disco para guardar tabelas, use o Applesoft com o DOS (a partir do Monitor, com 
3DOG). O comando usado e BSAVE. E necessario conhecer o enderego inicial e o comprimento 
da tabela a ser guardada, no nosso exemplo iniciando em $6000, o comando DOS. 

BSAVE QUADRADO, A$60GQ, L7 

cria um arquivo em disco chamado QUADRADO com tipo B de binario. A tabela entao fica 
gravada em disco, pronta para ser usada mais tarde. Use em cada caso particular o nome, enderego 
inicial e comprimento apropriados no lugar destes do exemplo. 
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Carregando Tabelas de Forma de Fita ou do Disco 

Apos guardar Tabelas de forma em fita, o Applesoft pode ler de volta para a memoria. Primeiro, 
volte a fita ate o im'cio. Depois digite: 

SHLOAD 

Acione o botao PLAY do gravador. 0 alto-falante gera bips por duas vezes e entao devolve o 
controle do computador para o teclado. Se existir algum problema na fita, pode aparecer a mensa- 
gem de erro ERR na tela. Nesse caso tente ler a fita novamente, ou, se o erro persistir, verifique o 
ajuste do volume, como foi descrito no Capi'tulo 2. 0 SHLOAD coloca automaticamente o 
HIMEM: no seu valor corrente menos o comprimento da tabela lida em bytes. Confira se o valor 
HIMEM: foi mesmo acertado. 

Se a tabela foi gravada em disquette, acerte o HIMEM: antes de tentar le-la para a memoria. 
O comando seguinte le a tabela do quadrado: 

BL.0AD QUADRADO 

0 DOS se lembra o enderego a partir de onde foi gravado ($6000 no nosso exemplo) e colo- 
cara a tabela de volta automaticamente. Se for desejado ler para outro enderego, por exemplo 
$3000, digite: 

BL0AD QUADRADO, A$3000 

De novo, use o nome e o enderego de sua tabela no lugar destes, do exemplo. 

Apos carregar a tabela com o BLOAD, sera necessario colocar o enderego nas posigoes 232 
e 233 ($E8 e $E9). O Applesoft usa essas posigoes para apontar a tabela de formas na memoria 
(o SHLOAD acerta estes enderegos automaticamente). Entre no Monitor e coloque o enderego 
($6000 no exemplo): 

E8 s 00 60 

Alternativamente, pode-se usar a declaragao POKE para colocar o enderego inicial da tabela 
nas posigoes 232 e 233. Lembre-se que com o POKE deve-se colocar enderegos em decimal. 

Agora estamos prontos para usar as tabelas de forma nos programas em Applesoft. 


COMANDOS DE DESENHAR AS FORMAS 

O Applesoft tern quatro declaragoes para desenhar, apagar e mudar a orientagao das formas: 

DRAW, que desenha a forma na tela do Apple II. 

XDRAW, que apaga a forma. 

ROT, que roda a forma em torno de eixos X e Y. 

SCALE, que altera o tamanho da forma desenhada. 

Os comandos de manipulagao de formas usam a pagina grafica de alta resolugao (usando 
HGR e HGR2) e a cor (usando COLOR), correntes. 


grAficos E SOM 


221 


O Comando SCALE 

Como declaragao em modo imediato ou programado, pode-se sempre usar o SCALE antes de dese- 
nhar uma forma pela primeira vez num programa 

SCALE> : 1 

manda manter a escala de urn ponto para cada vetor de desenho. Se SCALE = 5, o Apple 11 desenha 
5 pontos para cada vetor de desenho. Pode-se comandar o SCALE ate 255 (255 pontos para cada 
vetor). A maxima escala que se pode determinar e SCALE=0 que coloca 256 pontos para cada 
vetor de desenho. 


O Comando DRAW 

0 DRAW desenha a forma (numerada de 1 a 255) a partir da tabela de formas, na ultima cor 
determinada, na escala e valor de rotagao correntes. Esta declaragao 

DRAW 1 AT 140,96 

coloca a primeira definigao de forma iniciando na coluna 141 e linha 97 na pagina de alta reso- 
lugao. 0 desenho comega nas coordenadas dadas nesta declaragao. Uma segunda opgao da decla¬ 
ragao DRAW usa a posigao inicial imph'cita. 

DRAW 11 

Esta declaragao desenha a decima-primeira forma da tabela no ultimo ponto usado pela de¬ 
claragao DRAW ou HPLOT anterior mais recente. No caso das coordenadas nao terem sido refe- 
renciadas anteriormente, e adotado o ponto 0,0. 

IMPORT ANTE: 0 Applesoft assume que a tabela de forma esta colocada corretamente na 
memoria. Antes de executar uma declaragao DRAW, certifique-se que a forma esteja realmente la 
e os enderegos 232 e 233 ($E8 e $E9) apontem o infcio da tabela. Se for indicado urn numero de 
forma maior que o numero de formas existentes na tabela, ou se a declaragao DRAW usar linhas 
ou colunas nao validas, o desenho nao e executado; em seu lugar a mensagem de erro 7ILLEGAL 
QUANTITY ERROR e apresentada na tela. 


O Comando XDRAW 

Esta declaragao permite zerar uma forma sem limpar formas graficas anteriores. Aqui esta um 
exemplo: 


XDRAW 8 AT 90,96 

Esta declaragao e sintaticamente identica ao DRAW; as coordenadas podem ser explfcitas 
como mostrado acima ou imph'citas como mostrado na ultima declaragao DRAW exemplificada. 0 
XDRAW verifica a cor da coordenada desenhada e desenha a forma numa cor "complementar" 
aquela encontrada. No exemplo acima, o XDRAW ocorre na linha 91 e coluna 97 na tela. A Ta¬ 
bela 6.6 lista os complementos das cores de alta resolugao. 

Se as coordenadas, rotagao e escala forem as mesmas da forma presente na tela, XDRAW 
limpa a forma, deixando todo o resto do grafico intacto. 
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TABELA 6.6. Cores de Desenhos. 


Se a Cor 4 

A Cor do XDRAW ser4 

Preto 

Branco 

Branco 

Preto 

Violeta 

Verde 

Laranja 

Azul 

Verde 

Violeta 

Azul 

Laranja 


O Comando ROT 

0 comando ROT roda a forma em relapao ao centro da tela (nos eixos X e Y). A declaragao 

R 0 T == 1 6 

coloca o angulo de rota^ao da forma em 90 graus no sentido horario. 0 valor da ROT varia de 0 a 
255, apesar de haver apenas 64 possibilidades de rotagao, de 0 a 63. A Figura 6.4 mostra as mudan- 
<?as nas orientaqoes dos eixos a partir dos valores de ROT. 

Quando o valor do SCALE e colocado em 1, o ROT apenas roda a forma em incrementos de 
90 graus, o que significa que apenas quatro rotaqoes validas podem ser obtidas: 0=0 grau, 16=90 
graus, 32=180 graus e 48=270 graus. O Applesoft arredonda o valor de rotagao dado ao proximo 


ROT = 63 



FIGURA 6.4. Rotaqao da Forma. 
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menor valor de incremento do ROT. Todas as 64 possibilidades de rotagao ficam disponfveis ao 
se usar SCALE = 5 ou maior. 


Usando Formas em um Programa 

0 programa listado abaixo serve como um bom exemplo de aplicagao de formas e como elas se 
aplicam a programas: 

1 L.OMEM: 24600 
20 HGR2 

50 REM INDIOA ENDERECO DA FORMA 
60 POKE 232,0 
70 POKE 233,96 

75 REM USA TODAS AS CORES ALfERNADAS 

76 FOR I « 1 TO 7 

79 REM INCREMENTA 0 FATOP DE ROTACAO 

80 FOR H * 1 TO 80 
82 MCOL OR H 

90 ROT » I 

92 IF I<50 THEN SCALE-I 

105 DRAW 1 AT 140,96 

106 ROT = I + 32 

•110 DRAW 1 AT 140,96 

130 NEXT I 

140 NEXT H 

150 GOTO 76 

Usar formas graficas de alta resolugao e especialmente interessante em jogos. Pode-se montar 
uma biblioteca de formas sem ter que documenta-las como se faria usando declaragoes HPLOT. 
Elas diminuem em muito o consumo de memoria. Sao necessarios poucos calculos para manipular 
o tamanho e a orientagao dos objetos em alta resolugao criados, e os calculos sao simples quando 
comparados com a serie de declaragoes HPLOT necessaria para desenhar uma forma. Se existir 
ainda alguma dificuldade sobre as formas de alta resolugao, tente monta-las por conta propria. 
Isso e um pouco complicado devido a quantidade de passos necessarios para fazer aparecer uma 
unica forma grafica na tela. Usando o programa anterior que codifica as formas automaticamente, 
o trabalho fica facilitado. 


0 SOM DO APPLE II 


Apos a ultima segao vista neste capftulo, pode ser um alfvio ou um aborrecimento o estudo do 
sistema de alto-falante embutido no Apple II. Alfvio porque a operagao do alto-falante e real- 
mente bem simples. Aborrecimento porque nao se pode controlar esta parte com declaragoes em 
BASIC. Deve-se definir todos os sons que o Apple II emite em todos os detalhes. Essencialmente, 
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tudo o que se pode fazer na programapao do alto-falante e faze-lo emitir um unico dick. Para 
emitir sons diversos com o alto-falante varia-se a frequencia desses clicks, criando assim sons de 
diferentes tons. Esta sepao mostra como operar o alto-falante, e inclui um programa que cria uma 
serie de sons. 


OPERANDO O ALTO-FALANTE 

0 Apple II usa a posipao de memoria —16336, tambem conhecida como 49200 e $C030, como 
uma chave liga-desliga, a exemplo das chaves graficas vistas anteriormente neste capi'tulo. A qual- 
quer momento em que se acessar esta posipao, e emitido um click do falante do Apple II. Em 
BASIC, pode-se operar o falante usando a declarapao 

A«PEEK<49200) 

ou 

A-PEEK <-16336) 

Usar um programa BASIC para comandar o falante (mostrado no exemplo acima) e simples, po- 
rem o falante so gera frequences baixas. Isso porque o BASIC e relativamente lento. Em Integer 
BASIC, a maior frequencia possfvel e cerca de 256 Hz (ciclos por segundo), e em Applesoft, a 
maior frequencia e 72 Hz. A unica forma de gerar sons de frequencia mais alta e usar uma sub- 
rotina em linguagem de maquina para operar o falante. 

9 REM DAR UM "CLICK" NO ALTO' FALANTE! 

10 A * PEEK <-16336) 

20 GOTO 10 


A Sub-rotina em Linguagem de Maquina para Som 

Tanto o Applesoft quanto o Integer BASIC tern uma area de memoria entre 768 e 975 ($300 e 
$3CF) para sub-rotinas em linguagem de maquina e tabelas de formas sem necessidade de alterar 
as atribuipoes de LOMEM: (o DOS usa esta area, eliminando todo o conteudo anterior, quando 
carregado a partir do DOS master disquette em versoes anteriores a 3.3). 

Mesmo se nao souber linguagem assembler e de maquina, incorpore a sub-rotina seguinte 
em programas escritos em Integer BASIC ou Applesoft, digitando uma serie de numeros hexade- 
cimais. Para colocar a sub-rotina na memoria, entre no Monitor com o comando CALL-151 ou 
acionando RESET (Importante: com o DOS, certifique-se de te-lo carregado antes de entrar no 
Monitor). Entao, digite a sub-rotina em linguagem de maquina, como mostrado abaixo: 

>CALL -■•151 
*F'666G 

!302 s LDY 301 


0302- AC 01 03 

I LDX 301 


LDY 


$0301 


0 computador responde 
com as linhas escuras 
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0305“ 


AE 

01 

03 

LDX 

$0301 

! LDA 

#4 






0303- 


A 9 

04 


LDA 

#$04 

! JSR 

E CAB 






030A- 


20 

A 8 

EC 

JSR 

$FCA8 

! LDA 

0030 






030D- 


At) 

30 

CO 

LDA 

$C030 

! I NX 







0310- 


E8 



I NX 


' BNE 

310 






0311 - 


DO 

ED 


BNE 

$0310 

» DEY 







0313- 


88 



DEY 


! BNE 

305 






0314- 


DO 

EE 


BNE 

$0305 

! DEC 

300 






0316- 


CE 

00 

03 

DEC 

$0300 

! BNE 

302 






0319- 


DO 

E7 


BNE 

$0302 

! RTS 







031B- 


60 



RTS 



Esta sub-rotina usa enderegos $300 e $301 para guardar dados; os endere<?os $302 ate $31B 
contem a rotina. Uma vez digitada a sub-rotina, verifique se esta correta, assim: 

!$FF696 
*302L 


0302- 

AC 

01 

03 

LDY 

$0301 

0305- 

AE 

01 

03 

LDX 

$0301 

0308“ 

A 9 

04 


LDA 

#$04 

030A- 

20 

A 8 

EC 

JSR 

$ECA8 

0300“ 

AD 

30 

CO 

LDA 

$C030 

0310“ 

E8 



I NX 


0311 - 

DO 

ED 


BNE 

$0310 
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0313- 88 


DEY 


031 A- DO EF 

0316- CE 00 03 

0319- DO E7 

031B- 60 

031C- 20 20 70 


BNE $0305 
DEC $0300 
BNE $0302 
RTS 

JSR $7020 


031E- 08 
0320- 18 
0321- D8 
0322- 88 
0323- 08 


PHP 

CLC 

OLD 

DEY 

PHP 


0326- AO AO 
0326- 10 38 

* <- CTRL-B no BASIC aqui 


LDY tf$AO 

BPL $0360 


Tendo o DOS no Apple II, pode-se guardar esta sub-rotina em disco com o comando BSAVE: 

BSAVE SOM,A$302/L26 

Isso cria um arquivo binario chamado SOM, que pode ser lido mais tarde. Tendo cassette, grave 
a rotina com o seguinte comando no Monitor: 


*3Q2.31BU 


A sub-rotina e gravada na fita para uso futuro. 

A Interface do BASIC 

Precisaremos uma rotina em BASIC que fale com a sub-rotina em linguagem de maquina. Digite 
a seguinte listagem em Applesoft ou Integer BASIC: 


3200 REM OPERACAO DE ALTO-FALANTE 
3210 POKE 768rD 
3220 POKE 769, F' 

3230 CALL 770 
3260 RETURN 


Com esta rotina em operaqao conjunta com a rotina em linguagem de maquina, um programa 
BASIC pode gerar sons atraves de duas variaveis: F (para frequences) com variacao entre 1 e 255, 
com 255 sendo o maior tom, e D (para durapao) tambem entre 1 e 255, com 255 sendo o maior 
intervalo de duraqao possi'vel. Como exemplo, digite o programa BASIC seguinte apos a sub-rotina 
anterior: 


10 FOR T. » 1 TO 254 

20 F = 1 

30 D « I 

60 GOSUB 3200 

50 NEXT I 

60 END 
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Ao rodar o programa, oupa a durapao de cada nota. Nos finais de escala em baixa e alta frequencia, 
os sons sao menores que os obtidos em freqiiencias medias. Este problema e inevitavel porque a 
sub-rotina em linguagem de maquina usa instrupoes ao inves de tempo para trocar a frequencia de 
cada nota. Desde que nao existe relogio de tempo real no Apple II, este metodo e necessario. 
Gerando durapoes maiores para notas muito altas ou baixas pode-se obter a equalizapao. 


Urn Programa de Sons mais Elaborado 

0 programa listado abaixo usa as rotinas de gerapao de som mostradas antes para criar uma serie 
de sons que podem ser ouvidos, alterados e finalmente impressos para uso em outros programas em 
BASIC. Ao rodar o programa, aparece a mensagem (D)IGITA, (E)SCUTA, (l)MPRIME? A pri- 
meira apao e para digitar tons; digite E e acione RETURN. 

Agora a mensagem TON 0: FREQUENCIA, DURAQAO? aparece. Entre dois numeros sepa- 
rados por vi'rgula. 0 primeiro e a frequencia e o segundo e a durapao. Ambos os numeros devem 
estar entre 1 e 255. Ao acionar RETURN depois da digitapao da frequencia e durapao do tom, o 
falante do Apple II emite o tom. Este processo se repete para uma serie de tons (ate 100). Apos 
o ultimo tom entrado, digite 0 para tom e 0 para durapao para finalizar. 

Depois de digitar todos os tons, a escolha QUE NOTA DEVE ALTERAR? aparece. Se a 
intenpao e trocar algum dos tons entrados, coloque o seu numero; caso contrario digite 0. 

A mensagem (D)IGITA, (E)SCUTA, (l)MPRIME? aparece de novo ao final das alterapoes; 
agora digite E e acione RETURN. 0 Apple II repete toda a serie de tons digitada. Ao final da 
ultima nota, a mensagem aparece de novo. Coloque I para mostrar ou imprimir as freqiiencias e 
durapoes atribui'das a cada nota. 

0 programa listado abaixo pode facilmente ser modificado para permitir guardar os valores 
dos tons em cassette ou disco. Outros programas podem reler os tons gravados e, usando sub- 
rotinas de gerapao de som, tocar musicas e simplesmente emitir sons aleatorios. 

•io re::m programa de;: geracao de: sons 

19 REM 0 ARRANJO GUARDA OS TONS 

20 DIM A <100 x 2) 

29 REM LIMP A A CEIL A 

30 CALL -936 

40 INPUT < D ) 161T A , <E)SCUTA, CI) MPR I ME?" 5 A$ 

50 IF A$ * E" THEN 1000 

60 IF A« -••• "I" THEN 1200 

80 IF A$ < > THEN 30 

81 REM ENTRANDO CADA TOM 

90 PRINT 

100 I « 0 

105 M * I 

110 60SUB 3000 

119 REM FIM DA DIGITACAO? 

120 IF F « 0 AND D « 0 THEN I = I - 1: GOTO 200 

129 REM NAO, GUARDA NOME 

130 A(1,1) = F s A <I,2) « D 
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140 I a I + 1 
150 GOTO 105 

200 REM TROCA QUALGUER ITEM AGUI 

205 PRINT "SUE NOTA DEVE ALTERAR? ( 0—" 

206 INPUT E 

208 If" E = 0 THEN 30 

210 IF E < 1 OR E > I THEN 205 

220 M « E: GOSUB 3000 

230 A< E y1> * F s A < E 7 2) a D: GOTO 205 

1000 REM OUVIR NOTAS ENTRADAS 

1010 FOR K a 0 TO I 

1020 F a A < K y -1 ) 2 D a A (K y 2) 2 GOSUB 3200 
1030 NEXT K 
1040 GOTO 30 

1200 REM IMPRIME AS NOTAS 

1210 PRINT "NOTAtt"*"FREQ"*"DURACAO" 

1220 FOR K = 1 TO I 
1230 PRINT K » A (K »1 ) y A (K L2 ) 

1240 NEXT K 
1250 PRINT 

1255 PRINT "ACIONE RETURN PARA CONTINUAR"sINPUT Z$ 

1260 GOTO 30 

3000 PRINT "TOM "?M? 

3010 INPUT " ENTRE FREGUENCIA s- DURACAO" ? F » 0 
3015 IF F = 0 AND D « Q THEN RETURN 
3020 IF <F < 0 OR F > 255) OR <D < 1 OR D > 255) 
THEN 3010 
3030 GOSUB 3200 
3040 RETURN 

3200 REM CONTROLE DO ALTO FALANTE 

3210 POKE 768/D 

3220 POKE 769 > F 

3230 CALL 770 

3240 RETURN 
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Existe urn programa de controle residente no Apple II em memoria ROM (ready-only memory) 
chamado Monitor. Este capftulo descreve suas caracterfsticas e usos, mostrando como opera-lo 
em conjunto com os seus programas dedicados em BASIC. 0 Monitor e escrito em linguagem de 
maquina; serve como elo entre o BASIC (e as outras linguagens suportadas pelo Apple II) e as 
varias funpoes de baixo nfvel executadas pela maquina, como imprimir urn caractere, desenhar uma 
linha e assim por diante. 

Pode-se tambem usar o Monitor via comandos do teclado. Um dos usos e fazer a tabela de 
formas (descrita no Capftulo 6), para examinar memoria e isolar problemas de hardware, ou pro- 
gramar em assembler. A maior parte das vezes nao e necessario emprega-lo, porem ele tern algumas 
funcoes que podem ser uteis. 

Apos descrever o Monitor e suas facilidades, este capftulo mostra como usar o Mini-Assem¬ 
bler. Nao nos propomos aqui a ensinar a programar em linguagem assembler; o Apendice K de cada 
livro ensina assembler. Sera mostrado como integrar seu programa em assembler com um programa 
BASIC, e como usar o Mini-Assembler para escrever, testar e depurar. 


ACESSANDO O MONITOR 

Existem duas versoes do Monitor: a versao padrao e a versao Autostart. Se seu Apple II tern um 
Monitor padrao, simplesmente ligando a maquina o controle estara no Monitor. Nesta situapao, 
havera a tela cheia de caracteres aleatorios, com um asterisco ( * ) no canto direito em baixo da 
tela e o cursor piscando a direita do asterisco. Este asterisco e o de entrada no Monitor. 

Se o Apple II tern o Monitor Autostart (tanto como facilidade adicional ou como equipa- 
mento padrao no Apple II Plus), sera necessario usar ou Integer BASIC ou Applesoft para acessar 
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o monitor. Quando aparecer o caractere de entrada do BASIC (ou > para o Integer BASIC ou ] 
para o Applesoft), digite o seguinte comando: 

CALL -151 

Esta declaragao e realmente uma chamada de sub-rotina para o enderego FF69, mas o 
BASIC nao reconhece numeros hexadecimais, de forma que se deve usar o decimal equivalente 
ao FF69 neste comando. Uma vez digitada esta declaragao, aparece o asterisco, seguido do cursor. 
Neste ponto ja se esta no Monitor. 


DEIXANDO O MONITOR 

Existem poucas formas de se deixar o Monitor e voltar ao BASIC; elas dependem fortemente do 
que se deseja fazer apos deix4-lo. Para preservar as declaragoes de programa e as variaveis usadas no 
programa BASIC, deixe o Monitor acionando Ctrl-C, e depois Return. Apos fazer isso, volta-se 
ao BASIC. Neste ponto se pode imprimir o valor das variaveis e listar o programa (se algum deles 
estiver na memoria nesse momento). 

Para exemplificar, vamos supor que se colocou urn valor numa posigao de memoria via 
declaragao POKE e se deseja verificar o POKE. Claramente, se poderia usar PEEK para esse pro- 
posito, porem o Monitor permite acesso mais facil a memoria do Apple II do que PEEK e POKE. 
0 exemplo em Integer BASIC dado abaixo mostra como usar o Ctrl-C preservando o programa 
BASIC e as variaveis ao deixar o Monitor: 

>10 A»123 

>19 REM MOW. CURSOR PARA 13A. COL.UNA 

>20 POKE: 36,12 

>30 PRINT A 

>40 END 

>RUN. 

123 

>CALL -151 

* Acione Ctrl-C e depois Return 


>PRINT A 
123 
> LIS T 

10 A=123 

19 REM MOVE CURSOR 

20 POKE 36,12 
30 PRINT A 

40 END 


PARA 13A-C0LUNA 


Querendo deixar o Monitor e limpar o programa BASIC corrente e as variaveis guardadas na 
memoria, acione CTRL-B e depois RETURN. Assim volta-se ao BASIC, porem qualquer declaragao 
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de programa ou variavel presente na memoria serao zerados. Tente o exemplo acima, substituindo 
CTRL-C por CTRL-B. Na volta ao BASIC verifique que nao haja mais variaveis nem programa 
algum. 

0 CTRL-C opera corretamente com o Integer BASIC e o Applesoft em firmware. Nao fun- 
ciona com Applesoft em disco ou cassette. 

Com o Applesoft em disco ou cassette deve-se usar o CTRL-B para deixar o Monitor. Neste 
caso havera o retorno para o Integer BASIC e as variaveis e programas em Applesoft serao perdi- 
dos. Existe uma forma de voltar ao Applesoft com programas e variaveis intactos. 

Para voltar ao Applesoft em disco do Monitor, digite este comando: 

*3D0G 

Para voltar ao Applesoft em cassette do Monitor, digite este comando: 

*0G 

3DOG e OG sao dois comandos do Monitor (semelhantes ao GOTO do BASIC). Mais tarde 
serao vistos outros detalhes. 

IMPORTANTE: Use o comando OG apenas no Applesoft em cassette. 


FUNQOES DO MONITOR 


0 Monitor executa um numero limitado de tarefas, mas cada uma delas e relativamente poderosa, 
considerando o tamanho reduzido do programa. Pode-se examinar posipoes de memoria ou os 
registradores internos do microprocessador, listar conteudos de uma area de memoria na tela, ou 
jogar para outro dispositivo de safda, como a impressora, e ainda trocar o conteudo da memoria 
ou dos registradores. Outras funpoes incluem mover blocos de dados de um enderepo para outro e 
comparar dois blocos de posipoes de memoria. Ainda existem algumas outras funpoes que apa- 
recerao neste capftulo. 


EXAMINANDO A MEMORIA 

Existem tres metodos no Monitor usados para analise do conteudo da memoria: modos de endere- 
gamento simples, pa/avra ou b/oco. Um enderepo simples referencia uma posipao de memoria de 
um byte. Uma palavra e um segmento de memoria de oito bytes, comepando com um enderepo 
divisfvel por oito. Um bloco e a forma mais conveniente de ver uma area de memoria, iniciando 
com um enderepo e terminando com outro mais alto. 


Examinando Enderepos Simples 

Ao se ver o caractere do Monitor e desejando ver uma unica posipao de memoria, digite o enderepo 
hexadecimal dessa posipao seguido pela tecla RETURN, como no exemplo abaixo: 


*FF6? 
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0 Monitor responde com a apresentagao do conteudo daquela posigao: 

*FF69- A 9 

Quando se digita um enderego, o Monitor o retem para uso posterior, como um apontador. 
Assim, ao se digitar FF69 (ou outro enderego hexadecimal qualquer), o Monitor se lembrara 
daquela posigao, usando-a como referenda para exames posteriores de memoria, ate que ele seja 
mudado. Para trocar o apontador usado pelo Monitor, simplesmente digite um novo enderego. 
Por exemplo, digite: 

*30 OF 

e o Monitor poe esse novo enderego no apontador alem de mostrar o conteudo do enderego 300F. 


Examinando Palavras de Memoria 

Suponhamcs que foi examinado o enderego simples FF69 do exemplo acima, e agora se deseja 
ver os conteudos dos proximos enderegos superiores da memoria. 0 Monitor vai continuar exami¬ 
nando memoria se for digitado RETURN, como mostrado abaixo: 

*FF6? 

FF69- A9 

* Acione RETURN 

AA 85 33 20 67 FD 


* 

FT 70- 20 C7 FF 20 A7 FF 84 34 

* Acione RETURN novamente 


A primeira vez que foi acionada a tecla RETURN no exemplo, foram mostrados seis bytes na 
tela. Sao eles os conteudos das posigoes de FF6A ate FF6F. A segunda vez que se acionou RETURN 
toda a palavra de oito bytes foi mostrada, com o enderego de memoria inicial da frente (FF70) 
para lembrar qual foi a posigao inicial. Toda a palavra inicia numa posigao de memoria divisfvel por 
oito, daf porque o enderego inicial nao apareceu na primeira vez em que RETURN foi acionada. 
0 primeiro RETURN simplesmente terminou o bloco iniciado anteriormente no exame de uma 
unica posigao. 


Examinando Blocos de Memoria 

Pode-se examinar uma area maior de memoria (normalmente mais de oito bytes) em modo blocado. 
Digite o enderego inicial em hexadecimal, seguido por um ponto, e finalmente o enderego final 
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tambem em hexadecimal. Por exemplo: 

*F8Q0#F83F 

0 Monitor responde com o conteudo das posigoes de memoria do bloco: 


F800- 

3 A 

21 

4E 

6 F 

DA 

76 

98 

12 

F 808~ 

21 

00 

98 

fe: 

D2 

7F 

44 

98 

FBI 0~ 

33 

5F 

DD 

21 

76 

83 

6 F 

1 A 

FBI 8- 

A 2 

09 

0 5 

FO 

09 

3F. 

42 

12 

F820- 

C8 

20 

31 

4 F 

4D 

3C 

59 

2 A 

F828- 

48 

00 

20 

F8 

68 

05 

2 D 

27 

FS30- 

F5 

67 

1 A 

AC 

43 

22 

CB 

6 F 

F838- 

84 

2 D 

AO 

3B 

1 E 

3F 

55 

00 


# 


0 enderego inicial deve ser menor ou igual ao enderego final para que se veja mais de um 
enderego. Se o enderego final for menor que o inicial, aparecera apenas o conteudo do enderego 
inicial. 

Pode-se especificar uma area de enderegos que exceda o tamanho da tela do Apple II. Neste 
caso os dados vao saindo tela acima para dar lugar aos outros que vao aparecendo. Nao se pode 
cancelar este comando sem acionar RESET. Se o Apple II contiver o Monitor Autostart, pode-se 
parar temporariamente o processo acionando CTRL-S. Isso faz com que pare a safda pela tela, 
mas nao cancela a safda para outro dispositivo qualquer, como a impressora, dando a chance de 
ler a tela. Acione a barra de espago para continuar o processo. 

0 metodo blocado de examinar memoria e conhecido como dump. Quando ele termina, o 
apontador que mantem o proximo enderego a ser examinado e atualizado de forma a apontar o 
proximo byte depois do enderego final examinado do bloco. 

Uma forma mais compacta deste comando usa o apontador como enderego inicial do bloco. 
Digita-se o ponto seguido pelo enderego final do bloco. Por exemplo, se foi visto o enderego F800 
ate F83F, como no exemplo acima, pode-se continuar examinando um bloco iniciando em F840 e 
finalizando em F880 digitando-se: 

* n F880 

que resulta na seguinte safda: 


F 8 4 0 - 

20 

28 

FS 

88 

10 

F6 

60 

48 

F 8 4 8 - 

3 E 

09 

23 

FE 

54 

1 A 

DC 

6 F 

F 850- 

2 E 

4F 

DD 

38 

68 

11 

08 

4 A 

F 858- 

08 

00 

12 

34 

4D 

00 

30 

2 A 

F860- 

6 e: 

08 

10 

3B 

CA 

1 A 

20 

30 

F868- 

3 A 

fe: 

OF 

08 

00 

34 

87 

00 

F870- 

54 

AD 

28 

OC 

B3 

IF 

F8 

4F 

F878- 

F880- 

1 A 
OF 

00 

32 

40 

FC 

FA 

de: 

01 
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EXAMINANDO OS REGISTRADORES DO MICROPROCESSADOR 

As vezes e necessario examinar o conteudo dos registradores internos do microprocessador. Isso 
e feito digitando-se CTRL-E, seguido pela tecla RETURN. 0 resultado se parece com: 

A==CD X==B1 Y ~C3 P~ : B5 S*FG 

Os valores mostrados sao aqueles guardados no Acumulador (A), Registrador de Indice X 
(X), Registrador de Indice Y (Y), Registrador de Status do Processador (P) e Apontador de Pilha 
(S). Os valores a direita de cada sinal de igual sao os ultimos valores dos registradores. Entretanto, 
eles nao sao afetados pelo funcionamento do Monitor. Em outras palavras, o conteudo dos regis¬ 
tradores sao salvos pelo Monitor e ficam intactos ate que se execute um programa em assembler 
ou BASIC. 


ALTERANDO MEMORIA 

Alterar memoria e mais completo que simplesmente examina-la. Deve-se especificar qual o ende¬ 
repo a ser alterado bem como fornecer o novo dado que irS para o enderepo. Pode-se alterar um 
enderepo por vez (um byte por vez), ou pode-se modificar uma serie de posipoes de memoria 
consecutivas, entrando novos dados para Vcirias posipoes de memoria consecutivas num unico 
comando. 


Alterando Enderepos Simples 

0 primeiro passo para trocar um enderepo simples e indicar o apontador de enderepo, que e o mes- 
mo usado para examinar memoria. Devido aos dois comandos terem o mesmo apontador, indica-se 
o enderepo no apontador da mesma forma que no exame. Digite em hexadecimal o enderepo a ser 
alterado, e acione RETURN. Por exemplo 

*1200 

coloca o apontador com 1200 hexadecimal. 

0 Monitor responde com o conteudo da posipao de memoria: 

1200- 73 

Veja que esta entrada produziu a mesma resposta que o comando de examinar enderepos 
simples. A resposta mostra que o enderepo apontado e 1200, e tambem mostra o conteudo ante¬ 
rior deste enderepo (neste caso, 73). 

0 passo seguinte e colocar um novo valor neste enderepo. Para trocar, primeiro digite dois 
pontos ( : ) seguido por um numero hexadecimal de dois di'gitos que ir£ ocupar aquele enderepo. 
Por exemplo: 

* : 5F 


Os dois pontos ( : ) indicam um comando de alterapao para o Monitor. O 5F indica o novo 
dado a ser colocado na posipao 1200. Pode-se alterar a memoria usando uma linha de comando ao 
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inves de duas, como mostrado abaixo: 

*1200:5F 

Esta linha de comando tem o mesmo efeito na troca do enderego 1200 que as duas linhas 
separadas mostradas acima. 0 apontador de enderego e atualizado para 1200, e o Monitor coloca 
5F naquele enderego. O apontador de enderego vai para a posigao de memoria superior seguinte. 
Se for desejado trocar o enderego 1201 para 7F, por exemplo, digite: 

*:7F 

e o Monitor automaticamente atualiza o conteudo de 1201 para 7F. Aqui tambem o apontador e 
incrementado de 1 e se pode entao alterar o enderego 1202 para algum valor qualquer, conti- 
nuando o processo de alteragao de memoria sem especificar o enderego. 

Alterando mais Memoria 

O Monitor permite alterar mais de uma posigao de memoria por vez, colocando os enderegos que 
vao sendo alterados em sequencia na memoria (por exemplo, enderegos de 1200 ate 1207 inclu¬ 
sive). Este comando inicia da mesma forma que o metodo de alterar posigoes simples de memoria. 
Primeiro acerta-se o apontador, se necessario. A seguir, usa-se dois pontos para indicar ao Monitor 
que este e um comando de alterar memoria. Finalmente, digita-se os dados que se deseja em cada 
posigao sucessiva, separando cada um deles com um espago. 

Por exemplo, para colocar as quantidades de 00 a 07 nos enderegos de 1200 a 1207, digite: 

*1200:00 01 02 03 04 OS 06 07 

Pode-se na verdade alterar mais de oito enderegos. Colocando-se o apontador no infcio deste 
comando, poder-se-ia alterar ate 83 valores em uma unica linha. Sem indicar o apontador, pode-se 
colocar ate 84 valores. Em ambos os casos, a linha de comando pularia na tela ocupando varias de 
suas linhas. Isso nao e prStico porque quando uma linha de comando pula na tela, torna a verifi- 
cagao muito dif fcil. Alem disso, a unica forma de corrigir erros e dar backspaces ate eles, corrigi- 
los, redigitando o resto da linha. Em caso de se colocar muitos dados numa linha de comando, 
isso fica mais dif fcil. 

Verificando a Alteragao da Memoria 

E uma boa pratica verificar as alteragoes da memoria se o produto final (ou uma tabela grSfica 
ou uma serie de instrugoes em linguagem de maquina) deve ser preciso. Para isso deve-se usar 
uma das tres formas de examinar o conteudo da memoria vistos antes neste capftulo. Para iniciar 
a verificagao do que foi digitado, deve-se colocar o enderego inicial na primeira posigao onde foi 
feita alteragao. 

Assumindo que foi colocado 00 ate 07 nos enderegos de 1200 a 1207, coloque o apontador 
em 1200: 


*1200 

O Monitor responde com: 


* 1200 - 00 
x- 
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Pressionando RETURN pode-se ver os sete enderepos restarrtes que foram modificados: 

* +- Acione RETURN 

01 02 03 04 05 06 07 

# 

Se foram alteradas muitas posipoes, continue pressionando Return ate aparecer a ultima 
alterapao efetuada. 

Pode-se tambem usar o metodo de examinar bloco para esta area: 

*1200.1207 

0 Monitor responde com: 

1200- 00 01 02 03 04 05 06 07 


# 


Corrigindo Erros 

No caso de erros na digitapao das alterapoes, pode-se corrigir cada um individualmente sem se 
redigitar todos os dados. A forma mais simples e anotar o enderepo do dado errado e usar o meto¬ 
do de alterapao individual para corrigi-lo. 

Por exemplo, se foi cometido um erro na colocapao de 00 ate 07 no exemplo anterior, e o 
erro apareceu em 1204, digite: 

*1204 s 04 

para corrigir o erro neste enderepo. 0 passo seguinte e olhar de volta o enderepo 1204 e qualquer 
outra alterapao feita para certificar que agora tudo esta correto. Finalmente verifique todas as 
alterapoes para se assegurar que tudo agora esta correto. 


ALTERANDO OS REGISTRADORES DO MICROPROCESSADOR 

O processo de se alterar os registradores do microprocessador e um pouco diferente do de se alterar 
memoria, porque os registradores nao tern enderepo. Para alterar seus conteudos, primeiro deve-se 
examinS-los usando o comando CTRL-E. Imediatamente apos o comando de examinar o regis- 
trador, troca-se seu conteudo digitando-se dois pontos (o que significa uma operapao de alterapao 
no Monitor), seguido por de um a cinco numeros hexadecimais. Os numeros sao separados por 
espapos. 

O primeiro numero hexadecimal sera o novo valor do Acumulador, o segundo numero sera 
o novo valor do Registrador de fndice X, o terceiro sera o novo valor do Registrador de fndice Y, 
o quarto sera o novo valor do Registrador de Status do Processador e o quinto sera o novo valor 
do Apontador de Stack. Deve-se colocar valores para todos os registradores ate o ultimo da serie 
que se deseja trocar. Pode-se deixar intactos os valores dos registradores alem dele. 

Como exemplo, suponhamos que se deseja alterar o Registrador de fndice Y deixando os 
demais intactos. Primeiro, examinemos os registradores com CTRL-E. 
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* <- Acione Ctrl-E e RETURN 

A-CD X--B1 Y ~C3 P _:: B5 S=FQ 

# 

(Note que os conteudos dos registradores acima sao apenas exemplos.) 

Para trocar o Registrador de fndice Y para o valor hexadecimal 8A, sem trocar os outros 
registradores, digite os valores existentes do Acumulador e do Registrador de fndice X, seguidos 
pelo novo valor do Registrador de fndice Y. 

* CD EM 8A 

Para alterar qualquer registrador que nao o Acumulador (A), deve-se redigitar o conteudo 
de todos os registradores ate e inclusive o que vai ser alterado. 

Deve-se acionar CTRL-E e RETURN para examinar os registradores, ou o Monitor entende 
que se deseja alterar enderegos de memoria. 0 exame dos registradores diz ao Monitor para sair 
do apontador de enderegos para indicar posigoes de memoria e passar para alteragao direta de 
registradores. 

Para ilustrar outra alteragao de registrador, vamos verificar o Apontador de Stack (seu 
conteudo segue o S quando se examina os registradores) para passar a ter o valor 4B. Primeiro, 
lembre-se de examinar os registradores: 

K «- Acione CTRL-E e RETURN 

A=FF X~CD Y 01 P=*8A S=FQ 


# 

Agora digite os valores correntes, em ordem, para todos os registradores, e depois o novo 
valor do ultimo: 

*:FF CD 81 8A 4B 

Confira a digitagao com outro Ctrl-E para examinar os registradores uma vez mais. 


GUARDANDO E LENDO MEMORIA COM OS PERIF^RICOS DO APPLE II 

0 Monitor permite que se use um gravador cassette para guardar o conteudo de um bloco de me¬ 
moria em fita magnetica. Isso e util quando se criam formas graficas de alta-resolugao (veja o 
Capftulo 6), ou quando se faz programas em linguagem assembler que se deseja guardar. Com o 
Sistema Operacional em Disco do Apple II (DOS), pode-se guardar areas de memoria de forma 
ainda mais facil e confiavel, no disco. Para guardar memoria em disco deve-se deixar o Monitor 
temporariamente, usando o DOS dentro do BASIC para gravar e ler memoria. 


Guardando a Memoria em Fita Magnetica 

Para gravar em fita, use o comando de gravar fita do Monitor. Deve-se informar a ele os enderegos 
inicial e final da area a ser gravada. 0 comando inicia com o enderego inicial, seguido por um 
ponto, o enderego final e finalmente a letra W. 
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Por exemplo, o comando: 

*220Q.2FFFW 

diz ao Monitor para gravar conteudo de memoria, iniciando no enderepo hexadecimal 2000 e fina- 
lizando no enderepo 2FFF, no gravador cassette. 

0 comando de gravapao de memoria nao verifica os dados que manda para a safda de cas¬ 
sette; ela tambem nao testa (nem poderia) a existencia de fita dentro do gravador conectado ao 
Apple II. Deve-se fazer todo o necessario para assegurar que a fita nao tenha qualquer falha ou 
que exista qualquer problema inerente ao uso de fita cassette. 

Quando der o comando para gravar em fita, nao acione RETURN ate colocar o gravador no 
modo RECORD e que a fita esteja visivelmente em movimento. Se o cassette usado estiver no 
in (do da fita, deixe-o correr pelo menor por cinco segundos antes de acionar RETURN , para per- 
mitir que passe a parte inicial nao magnetica pela cabepa. 

Ao se acionar RETURN, o computador espera durante dez segundos antes de mandar dados. 
Isso permite ao gravador cassette zerar qualquer informapao previa (musica, voz ou dados) na 
fita. 0 computador manda urn tom de referenda para a safda durante este tempo. 0 Monitor usa 
este tom mais tarde como urn sinal de sincronismo para o comando de leitura (visto na sepao 
seguinte). 

Quando o comando de gravar memoria termina, o alto-falante do Apple II da urn bip e o 
controls volta ao Monitor. 

0 comando de gravar permite que se guarde em fita desde um byte ate 64 kilobytes (65.536 
bytes). 0 Monitor manda dados atraves da safda para gravador na velocidade de 210 caracteres 
por segundo aproximadamente (considerando que 16.384 bytes sao enviados em 77,5 segundos, 
apos o tom de referenda). Depois de transmitir o ultimo byte de dado, o Monitor manda um byte 
de verificapao ao gravador. 0 comando de leitura usa este byte para verificar a validade dos bytes 
na leitura. 


Leitura de Dados da Fita Magnetica 

0 comando de leitura da fita permite pegar de volta os dados gravados em cassette e joga-los de 
volta na memoria. Para executar este comando, digite o enderepo inicial (a partir de onde os 
bytes da fita devem ser carregados na memoria), seguido imediatamente por um ponto, o ende¬ 
repo final (onde o ultimo byte lido sera colocado), e por fim a letra R. 

Por exemplo, o comando 

*2000.20FFR 

diz para ler dados do cassette para a memoria, iniciando no enderepo hexadecimal 2000 e termi- 
nando em 20FF. 

Diferentemente do comando de gravar, este forpa o Monitor a esperar ate que se acione a 
tecla PLAY do gravador cassette. O computador espera o tom do gravador cassette, e o Monitor 
bloqueia o computador ate a chegada do sinal. Antes de se acionar o PLAY do gravador, posicione 
a fita onde o tom de referenda comepa. Pode-se perceber a diferenpa entre o tom gravado e o lido 
de forma auditiva. Remova o cabo do fone externo para ouvir a fita usando o alto-falante do 
gravador. O tom de referenda e um zumbido de tom medio e constante. Ja os dados se parecem 
com rufdo aleatorio ou estStico. 
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Ajuste o volume do gravador antes de dar o comando de leitura. 0 procedimento para este 
ajuste e o mostrado no Capftulo 2. 

0 comando de leitura de memoria espera pela leitura de exatamente a mesma quantidade de 
memoria que foi gravada anteriormente. Se foram gravados 1024 bytes numa fita e se deseja ler 
apenas os primeiros 256 bytes, o Monitor vai transferir os dados mas provavelmente virS tambem 
uma mensagem de erro. O mesmo acontece no caso de se ler mais dados do que esta gravado na 
fita; ha uma forte possibilidade de aparecer uma mensagem de erro. 


Condigdes de Erro no Comando de Leitura para a Memoria 

0 Monitor ouve o gravador cassette pelo menos durante 3,5 minutos antes de esperar dados de 
entrada. Isso permite ao Monitor ficar em fase com o tom de referenda. Se a fita contem menos de 
3,5 segundos desse tom, o Monitor perde o infcio da transmissao de dados do cassette, resultando 
em erro de verificagao. Alem disso, nao se fica sabendo em que ponto o Monitor comegou a ler a 
fita, porque ele sempre fica tentando ler dados da fita para a memoria, dados validos ou nao. Neste 
caso ocorre uma mensagem de erro (um bip no alto-falante seguido da mensagem ERR no video 
e o retorno ao Monitor). Para corrigir o erro, volte a fita ao infcio. Acione PLAY com o fio de 
conexao entre o Apple II e o gravador desconectado e mega o tempo de duragao do tom. Se for 
menos de 3,5 segundos ate o infcio dos dados, serS necessario gravar os dados novamente. Isso em 
geral acontece quando se esquece de pular manualmente o infcio nao magnetico da fita. 

A leitura de mais ou menos dados da fita para a memoria do que aquilo que foi originaria- 
mente gravado provavelmente causa uma mensagem de erro na tela do Apple II. 0 ultimo byte 
enviado da memoria para o gravador durante o processo de gravagao e o byte conhecido como 
checksum, um byte obtido pela somatoria de todos os bytes gravados. Logicamente, seu valor 
depende de quantos dados e do valor de cada um deles. Quando na leitura o que e lido nao coin¬ 
cide com o original, o Monitor nao pode detectar qual byte lido 6 o checksum. Ele assume que o 
ultimo byte que consegue ler seja o checksum. Assume tambem que o ultimo byte que le do 
cassette para a memoria (determinado pelo enderego final no comando de leitura) ser£ seguido 
pelo checksum. Ele executa seu proprio calculo do checksum com os dados entrados na operagao 
de leitura e o compara com o que e lido do cassette. Se os dois bytes nao coincidem, uma mensa¬ 
gem de erro e mostrada. E pouco provavel, mas possfvel, que os dois bytes sejam iguais, por pura 
coincidence. Como regra geral, deve-se ler a mesma quantidade de memoria que foi gravada para 
permitir ao Monitor executar totalmente o controle atraves do checksum. Mais tarde, neste capf¬ 
tulo sera mostrado como verificar uma operagao de leitura de memoria atraves do Monitor. 


Guardando Memdria em Disco 

Com o Sistema Operacional em Disco do Apple II, guardar conteudo de memoria e muito mais 
facil e confiavel que em fita cassette. As regras para isso sao um pouco diferentes porque se usa 
BASIC ao inves do Monitor para executar esta fungao. Este e um comando de nfvel superior ao de 
manuseio de cassette inclufdo no Monitor, e por isso deve ser usado sempre que possfvel. Antes de 
ler esta parte, e recomendSvel que se tenha familiaridade com o DOS (no Capftulo 5). 0 DOS 
deve estar na memoria antes do infcio (veja Capftulo 2). 

Estando no Monitor, deve-se deixS-lo temporariamente, indo ao BASIC sob o DOS com os 
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comandos CTRL-C ou Ctrl-B quando se tem o Monitor Autostart, ou o comando 3DOG no 
Monitor padrao. 

Aqui estS um exemplo do comando DOS para guardar conteudo de memoria em disco: 

BSAVE T ABFORMA 7 A$30G0, L.256, 86, D1 , 0201 

Este comando faz criar um arquivo DOS em disco chamado TAB FORMA. 0 parametro seguinte, 
A$3000, jogara para o disco a partir da posipao de memoria 3000 hexadecimal. O A se refere ao 
enderepo. A terceira parte L256 especifica o comprimento em bytes da memoria a ser gravada, 
neste caso 256 bytes decimais. 0 maior comprimento e 32767 decimal ($7FFF hexadecimal). 
0 BSAVE permite usar numeros decimais ou hexadecimais como enderepo ou comprimento. 
Em se usando valores hexadecimais, deve-se colocar o sinal de dolar a frente. 

Os ultimos tres parametros no exemplo (S6, D1, V201) sao opcionais. Eles especificam o 
disco a usar. Use o parametro S (slot) apenas quando tiver mais de um cartao controlador de disco 
e o disco que deve receber a gravapao nao e o mesmo que foi operado quando do ultimo acesso ao 
disco (nao e o corrente). Usualmente o slot 6 e o padrao. O parametro D (numero de drive) 6 
util, porem nao necess2rio; ele especifica o numero do drive apenas se ele difere do ultimo drive 
acessado, o corrente. O parametro V (numero de volume) e o numero de volume guardado no 
diretorio do disco onde se esta guardando memoria. Se o volume especificado na declarapao 
BSAVE difere do gravado no disco, aparece uma mensagem de erro. 


Lendo para a Memoria a Partir do Disco 

Como foi feito com o BSAVE, usa-se o DOS para ler do disco para a memoria. O comando BLOAD 
faz isso. 

Aqui est2 um exemplo do BLOAD: 

BLOAD TABFORMA, A$3000 

Este exemplo carrega o arquivo chamado TAB FORMA do disco em uso corrente e coloca os 
dados diretamente na memoria, iniciando no enderepo 3000 hexadecimal. Esta declarapao de 
comando tambem aceita enderepo decimal. O parametro A (enderepo inicial), nao e necessario se o 
conteudo do arquivo inicia na mesma posipao a partir de onde foi gravado. So e necessario espe- 
cificar enderepo se ele for diferente do usado na definipao de enderepo inicial do BSAVE. O para¬ 
metro L (comprimento) e opcional mas nao imprescindfvel. O DOS verifica o comprimento do 
arquivo em disco e termina o comando de leitura automaticamente. Os parametros de disco 
opcionais do BSAVE (S, D e V) tambem podem ser usados no BLOAD para especificar slot, drive 
e volume. 

Cuidado para nao usar este comando em areas de memoria que podem estar ocupadas com o 
DOS, o interpretador Applesoft, paginas de texto ou graficas, ou variaveis BASIC. E possi'vel que 
se escreva sobre essas partes, destruindo dados que poderao ser necessarios mais tarde. 


MOVENDO E COMPARANDO BLOCOS DE MEMORIA 

O Monitor tem duas funpoes que podem ajudar, quando se le ou grava memoria em fita. A funpao 
de mover, que copia conteudo de blocos de memoria de uma area para outra e a funpao de com- 
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parar dois blocos de memoria de enderepos distintos e mostrar as diferenpas entre eles. Usados em 
conjunto com os comandos de ler e gravar dados, estas funpoes fornecem uma maneira adicional de 
controlar se os arquivos gravados tern os dados corretos. 

O Comando de Mover Memoria 

Para mover dados de um enderepo de memoria para outro, deve*se fornecer o enderepo receptor 
inicial (para onde os dados devem ir), o enderepo fonte inicial (de onde os dados partirao) e o 
enderepo fonte final, o ultimo enderepo com dado a ser movido. 0 formato deste comando e o 
do enderepo inicial receptor, seguido do sinal de menor ou igual «), o enderepo inicial fonte, um 
ponto, o enderepo final fonte, e a letra M (de mover). Como outros comandos do Monitor, todos 
os enderepos sao em hexadecimal. 

Por exemplo, o comando: 

#1200< 2000.2100M 

move dados para o enderepo 1200 hexadecimal (o enderepo inicial do receptor), a partir do bloco 
que inicia em 2000 hexadecimal (o enderepo fonte inicial) e finalizando em 2100 (o enderepo 
fonte final). O Monitor copia o conteudo da memoria, do enderepo 2000 ate 2100 para os ende¬ 
repos entre 1200 ate 1300, neste exemplo. Como os enderepos sao em hexadecimal, o compri- 
mento do bloco a ser copiado e 257 bytes decimal, ou 101 bytes em hexadecimal. O conteudo 
original dos enderepos entre 2000 e 2100 ficam intactos. 

Quando se especifica os enderepos no comando de mover, o enderepo fonte inicial deve ser 
menor ou igual ao do fonte final. Se o enderepo final for menor que o inicial, o Monitor so movera 
um byte, para o enderepo receptor inicial, saindo da operapao de mover. 

Preenchendo Memoria 

0 comando de mover memoria tambem a preenche. Preencher memoria e carregci-la com um ou 
mais bytes repetidamente em enderepos consecutivos. Suponha que se queira colocar zeros numa 
area de memoria, iniciando no enderepo 1D00 e finalizando em 1DFF. Usando de forma criativa 
os comandos de alterar e mover memoria, pode-se preencher areas de memoria com um valor 
pre-determinado, ou padrao. 

Para infcio, deve-se colocar zeros no primeiro byte da memoria: 

# 1000:00 

Este 6 o primeiro passo para preencher memoria. O segundo usa o comando de mover me¬ 
moria para copiar o conteudo de um (ou mais) bytes em um bloco adjacente de memoria. 

Especifique o enderepo receptor inicial como um acima do ultimo byte do padrao (neste 
exemplo, deve ser 1D01). Coloque o enderepo inicial do fonte no infcio do padrao (neste caso 
1D00), e coloque o enderepo final do fonte como o ultimo a ser preenchido com o padrao (1DFF) 
menos o comprimento do padrao que se quer colocar no bloco de memoria (1DFE). 

Continuando o exemplo, o comando 

#1DQ1<1D00.1DFEM 

enche as posipoes de 1D01 at6 1DFF de zeros (ou mais precisamente, com o conteudo da posipao 
1D00). Este processo so funciona quando o padrao existe no infcio do bloco que se deseja preen- 
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cher. Aqui esta o que acontece. Como o enderepo inicial do receptor e um byte adiante do ende¬ 
repo inicial fonte, o Monitor move primeiro o conteudo de 1D00 para 1D01, colocando este 
ultimo enderepo em 00. Quando o segundo byte e movido, vai-se de 1D01 para 1D02. 0 processo 
continua ate que o conteudo do enderepo 1DFE (colocado em zero na ultima transference de 
byte) vai para 1DFF. Observando essas posipoes pode-se ver os enderepos de 1D00 a 1DFF preen- 
chidos com zeros. 

Pode-se desejar preencher memoria de 1D00 a 1DFF com um padrao de quatro bytes, sendo 
necessaria a alterapao dos primeiros quatro bytes do bloco: 

*1000:00 SE 7 F FT 

0 padrao ja esta la. Para preencher memoria ate 1DFF com este padrao, coloque o comando: 

* 1D04 <1D00«1DFB 


Note que o enderepo inicial do receptor vem um byte depois do final do padrao, o enderepo 
inicial do fonte aponta o im'cio do padrao e o enderepo final do fonte aponta o ultimo enderepo a 
ser preenchido menos o comprimento do padrao: 

1DFF 

— 04 (Aritmetica hexadecimal) 

1DFB 

Uma vez mais, ao se executar este exemplo pode-se examinar o conteudo de 1D00 ate 1DFF 
para observar o padrao repetido no bloco. 


O Comando para Verificar Memoria 

Este comando do Monitor compra dois blocos de memoria entre si, detectando as diferenpas entre 
os dados. Pode-se usa-lo em conjunto com os comandos de leitura e gravapao de memoria suporta- 
dos pelo DOS. Ao se gravar dados da memoria em qualquer dispositivo e querendo saber se o 
processo ocorreu de forma correta, usa-se o comando de verificar a memoria. 

O formato para este comando e parecido com o de mover bloco de memoria. Digite o ende¬ 
repo inicial de destino (onde inicia a comparapao de memoria) seguido imediatamente pelo sinal 
de menor (< ), o enderepo inicial do fonte (onde inicia a comparapao com o destino), um ponto, 
e o enderepo final do fonte (onde fica o ultimo byte a ser comparado neste comando). O ultimo 
item e a letra V, de verificar. 

Aqui esta um exemplo: 

*32D0<Q.CV 

Com isso o Monitor e instrui'do para iniciar a comparapao no enderepo 32D0 contra o enderepo 0, 
e continuar a comparapao ate o enderepo 000C. Veja que nao e necessario zeros nao significativos 
na indicapao de enderepos para o Monitor. 

Se o Monitor encontra um byte no bloco fonte que nao coincide com o destino, sao mostra- 
dos o enderepo fonte e seu valor, bem como o destino e seu valor. 

Por exemplo, suponha que se move do enderepo 0000 ate 000C para os enderepos 32DO 
ate 32DC: 
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*3200<Q.CM 

e em seguida se manda mostrar os blocos fonte e destino: 

#0 - C 


0000- 

4 C 

3C 

04 

4 C 

3 A 

DB 8C BC 

0003- 

FF 

FF 

4 C 

99 

El 


#3200, 

»3 P 

OC 





3200- 

4 C 

3 C 

04 

4 (!) 

3 A 

0B BC 8C 

3208- 

FF 

FF 

4C 

99 

El 



■K- 


pode-se verificar visualmente a operagao de transference de dados. Se o enderego 32D8 for alte- 
rado do seu valor atual (FF) para 5A 

*32D8:5A 

e em seguida for dado o comando de verificar memoria 

*3200<0..CV 

o Monitor vai comprar o bloco fonte com o destino byte a byte ate encontrar 0008 contra 32D8. 
Como este ultimo foi alterado, o Monitor informa a discrepancy 

0008-F F < 5 A) 

•# 

significa que o valor do enderego 0008 no bloco fonte nao coincide com o mesmo enderego rela- 
tivo do bloco destino (32D8). Primeiro e mostrado o enderego fonte (0008, cujo conteudo e FF) 
e depois, entre parenteses, e mostrado o conteudo divergente do destino (5A). 

O enderego do bloco destino nao aparece; o Monitor assume que se pode somar facilmente 
numeros na base 16 para achar o enderego do destino. Uma forma de evitar o calculo e refazer a 
operagao trocando o fonte com o destino: 

*0<32D0.32DCV 

o que resulta em: 

32D8-5A (FF) 

Esta mensagem mostra que o enderego fonte 32D8 contem 5A hexadecimal, com seu corres- 
pondente (enderego 0008 como visto acima) contendo FF. Este metodo elimina um calculo, mas 
coloca outro; isto e, deve-se calcular o novo enderego fonte final (32DC). 


Verificando Memoria Guardada em Perif6ricos do Apple II 

O comando de verificar memoria e especialmente util quando se guardam dados da memoria em 
fita ou disco. Gravando uma porgao de memoria e lendo para uma area diferente, pode-se verificar 
se os dados foram gravados corretamente. O exemplo a seguir mostra como executar este processo 
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para programas em linguagem assembler, tabelas de formas, e outras informagoes que se podem 
guardar nos perifericos do Apple 11. 

No caso de se usar gravador cassette para guardar memoria em fita, o primeiro passo e dar o 
comando de gravar memoria como mostrado neste exemplo: 

*2000.2QFFW 

Este comando grava dados da memoria, iniciando no enderego 2000 e terminando em 20FF, 
em fita cassette. Nao se esquega de acionar a tecla RECORD antes de acionar RETURN. Uma vez 
que o alto-falante do Apple II emite o bip indicando que o processo de gravagao terminou, desligue 
o gravador e rebobine a fita ate onde o tom de referenda foi dado. Assumindo que existe uma area 
de memoria dispom'vel de 2100 a 21FF, use o comando de ler dados da fita para a memoria a 
partir do enderego 2100, finalizando em 21 FF: 

*210Q.21FFR 

Nao se esquega de acionar no gravador a tecla PLAY. Quando o alto-falante do Apple II emitir o 
bip, a operagao de leitura estarS conclufda. Agora entao pode-se comparar o dado gravado com o 
lido da fita: 


*2000< 2100 * 21FFV 

0 comando compara memoria iniciando em 2000 ate 20FF, com o que esta gravado e foi 
lido do cassette, a partir do enderego 2100. Se nao aparecer nenhuma diferenga, pode-se ter cer- 
teza que os dados foram gravados corretamente. 

Para verificar memoria gravada em disco, o mesmo processo se aplica. Antes de tentar gravar 
ou ler memoria no disco, o Sistema Operacional (DOS) deve tambem estar presente. Aqui, o pri¬ 
meiro passo e dar um comando BSAVE de bloco de memoria para disco: 

BSAVE MEMDADO, A$20QCM.*FF 

A memoria guardada em disco pode ser lida de volta com BLOAD: 

e L 0AD MEMOADO/ A* 2100 

Note que o parametro de enderego nesta declaragao e 256 bytes (decimal) maior que o ende¬ 
rego inicial de gravagao. Quando o arquivo MEMDADO e lido, o comando de verificagao compara 
os dois blocos: 


CALL -151 


*2000<2100.21FFV 

Se nao ocorrer diferengas, pode-se estar certo que os dados da memoria foram gravados 
corretamente no disco; de outra forma, o Monitor vai apontar as diferengas entre os blocos de 
forma que se possa corrigir. 


O COMANDO GO 

O Monitor tern um comando que transfere o controle do Apple II para o programa no enderego 
que se especifica. No infcio deste capi'tulo viu-se como deixar o Monitor e voltar para o Applesoft 
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em disco. 0 comando: 

*3 DOG 

instrui ao Monitor para pular para o enderego 3D0 e executar instrugoes em linguagem de maquina 
a partir de la. A letra G no final da linha de comando vem de GO. Se esta instrugao for dada com o 
DOS na membria, o enderego 3D0 tera a primeira parte da instrugao em linguagem de maquina: 

,JMP $9DBF 

Quando o Monitor transfere o controle para o enderego 3D0, o computador pula para o 
enderego 9DBF, onde as rotinas do DOS iniciam. 

A forma geral do comando GO e o enderego para onde o controle vai, seguido da letra G. 
0 enderego e opcional, o Monitor usa o apontador de memoria se ele nao for fornecido. 


USANDO A IMPRESSORA 

Se o Apple II esta conectado a uma impressora via Interface Serial ou Cartao de Comunicagao, 
pode-se usa-la para safda de dados. Para transferir a safda do vfdeo para a impressora, coloque o 
numero do slot onde esta localizado o cartao de interface, seguido de CTRL-P e RETURN. Uma 
vez dado este comando, toda a safda normalmente colocada no vfdeo sera transferida para a 
impressora. Para voltar a safda para a tela, use numero de slot 0 com o comando CTRL-P. 

Quando for usado este comando, verifique que exista mesmo o cartao de interface no slot 
especificado. Se for indicado um lugar sem cartao, o Apple II ira travar, e a unica forma de sair 
ser3 acionando o RESET. 

Os comandos de impressora operam exatamente como o comando PR# (numero de slot) 
do BASIC. Ambos operam a chave CSW de dois bytes (chave de safda de caractere) no enderego 54 
($36). Esses dois bytes contem o enderego que aponta para a rotina de safda de caracteres corren- 
te. Trocando o numero do slot com CTRL-P, troca-se o enderego dessa chave. 


OS COMANDOS DE TECLADO 

Este comando direciona o Monitor para aceitar entrada via outro dispositivo que nao o teclado 
do Apple II. Digite o numero do slot e Ctrl-K, acionando entao RETURN. Para voltar para o 
teclado, digite o mesmo comando com numero de slot 0. 

Neste caso e atuada a chave KSW (chave de entrada via teclado) no enderego 56 ($38) 
sendo colocado o enderego do dispositivo de entrada que for colocado no teclado. 


INDICANDO MODOS DE DISPLAY 

Para que o Monitor se apresente em modo vfdeo reverso, entre o comando de inverter, abre- 
viagao I. Isso fara com que tudo o que o Apple II mostra na tela seja colocado como letras brancas 
em fundo preto. Entretanto, todos os comandos do Monitor digitados ficarao em modo vfdeo 
normal. 


246 


APPLE II 


Para sair do modo inverso, digite o comando para vi'deo normal, abreviapao N. Nenhum 
destes comandos necessita de parametros adicionais, alem das letras I ou N. 


ARITMgTICA BINARIA EM OITO BITS USANDO O MONITOR 

0 Monitor executa funpoes de adipao e subtrapao em oito bits. 0 resultado obtido tambem se 
apresenta com oito bits. Para executar adipao, digite a primeira parcela hexadecimal seguida pelo 
sinal (+), seguida pela segunda parcela. Se o resultado e maior que FF, o Monitor trunca o dfgito 
mais significativo e mostra os oito bits menores do resultado, como mostrado neste exemplo: 

*7F+8A 

~09 

Para executar subtrapao, digite o minuendo, seguido pelo sinal (—) e o subtraendo. Como na 
adipao, ambos os numeros devem ser hexadecimais. Se o resultado for menor que zero, o Monitor 
mostrara o complemento do resultado em 1, como se ve abaixo: 

#0A~2D 
- D D 


COMANDOS DO MONITOR DEFINIDOS PELO USUARIO 

Digitando-se CTRL-Y no Monitor, pode-se chamar uma rotina especial definida por usuario. 0 Mo¬ 
nitor pula automaticamente para o enderepo hexadecimal 3F8 ao se entrar com Ctrl-Y. Nesse 
local existe espapo para uma instrupao de jump em linguagem de maquina. Se existir alguma rotina 
em linguagem de maquina para acessar dentro da maquina, o enderepo inicial dessa rotina deve ser 
colocado em 3F8. 

0 exemplo abaixo mostra como usar o Ctrl-Y para reiniciar o Applesoft em disco sem ter 
que redigitar o conhecido comando 3DOG. 

Primeiro, deve-se conhecer o formato da instrupao jump em linguagem de maquina. Ela 
ocupara tres bytes. 0 primeiro e o codigo da instrupao, 4C. Os dois bytes seguintes sao o enderepo 
para onde sera dado o salto, com os bytes trocados. Deve-se indicar o byte de menor valor 
primeiro (parecido com informar o sobrenome primeiro). 

Aqui esta urn comando de alterapao de memoria para orientar o salto para o enderepo 3D0: 

*3F8 5 4C DC) 03 

Tente agora o CTRL-Y. Isso e bem melhor que 3DOG! 

Para outro exemplo, veja como se pode usar o CTRL-Y para ir ao Mini-Assembler, descrito 
na sepao seguinte em detalhes. Digite o comando do Monitor: 

#F666G 

aparece o caractere de entrada do Mini-Assembler: 
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0 enderepo onde o Mini-Assembler inicia, F666, pode ser usado na instrupao de salto em 

3F8: 


I3F8SJMP %F666 

03F8- 4C 66 F6 JMP $F666 «- 0 Mini-Assembler 
! mostra esta linha 

Embora o Mini-Assembler nao tenha sido estudado ate agora, a linha acima altera o enderepo 
da instrupao jump em 3F8 hexadecimal para $F666, que e o enderepo onde inicia o programa 
Mini-Assembler. Para voltar ao Monitor, digite o comando: 

!$FF69G 

*• 

Aparece o caractere de apresentapao do Monitor na parte inferior esquerda da tela. Em seguida, se 
for acionado CTRL-Y, aparecera o caractere do Mini-Assembler. Operando como o comando defi- 
nido por usuario para acessar o Mini-Assembler, elimina-se a digitapao de enderepos. Altere o 
comando definido pelo usuario colocando urn enderepo diferente na instrupao de saldo no ende¬ 
repo 3F8. 


O MINI ASSEMBLER 


No Apple II padrao (ou cartao Integer BASIC com Apple II Plus), existe urn programa em ROM 
que permite ao programador em linguagem de maquina evitar a tortura de montar o programa. 
O Mini-Assembler e acoplado ao Integer BASIC em ROM. E chamado de Mini porque o progra¬ 
mador precisa usar enderepos literais, ao inves de rotulos mnemonicos, como operandos nas 
declarapoes em linguagem assembler. Alem disso, cada linha de codigo digitado e automStica e 
imediatamente montado em linguagem de maquina. 0 principal problema aqui e que nao se pode 
inserir ou eliminar instrupoes, como se faz usando montadores assembler completos junto com 
editores de texto. 

A principal vantagem do Mini-Assembler e sua habilidade de entrar instrupoes em linguagem 
de maquina diretamente no Apple II, embora mantendo a facilidade de se operar com os mnemo¬ 
nicos das instrupoes na linguagem assembler. 

0 resto deste capftulo descreve o Mini-Assembler e diz como usa-lo. Ele nao ensina concei- 
tos de programapao em assembler, nem mostra o conjunto de instrupoes do 6502 que o Apple II 
usa. 

Assim, se houver ainda dificuldade de entender coisas como assembler, operandos, mnemo¬ 
nicos etc., para por aqui. Aprenda primeiro as tecnicas de programapao em assembler e as instru¬ 
poes do 6502. Depois termine de ler este capftulo. 


ACESSANDO O MINI-ASSEMBLER 

0 ponto de entrada do programa mini-assembler e F666 hexadecimal. Para partir vindo do Monitor, 
digite o comando: 
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*F666G 

Isso causa o salto do Monitor para o Mini-Assembler. Estando em Integer BASIC ou Applesoft 
(versoes em disco ou cassette), entre o comando de modo imediato: 

CALL -2458 

Ao entrar no mini-assembler o alto-falante d3 urn bip. 0 caractere de entrada do Mini-Assem¬ 
bler e o ponto de exclamacao ( ! ). 


Erros Entrados 

0 Mini-Assembler detecta erros na digitapao de instrupoes em linguagem assembler. Ele mostra os 
erros com bip no alto-falante e mostrando a instrugao errada com o sinal ( ) sob o primeiro 

caractere incorreto da instrugao. 0 contador de posigoes nao e incrementado; ele permanece 
intacto de forma que se pode redigitar a instrugao corretamente. 


COMANDOS DE MONITOR NO MINI ASSEMBLER 

A qualquer momento dentro do Mini-Assembler, pode-se executar comandos do Monitor. Imedia- 
tamente a apresentagao da exclamapao ( ! ), digite o sinal dolar ($), seguido do comando do 
Monitor. O exemplo abaixo mostra como examinar conteudo de memoria a partir do Mini-Assem¬ 
bler: 


i*1 OFF 
1CFF- E6 

i 

Isso elimina a perda de tempo em se ir e voltar do Mini-Assembler ao Monitor, pode-se digi- 
tar qualquer comando do Monitor estando no Mini-Assembler, apenas entrando o sinal dolar como 
primeiro caractere do comando. De fato, esse procedimento tambem deve ser usado na safda do 
Mini-Assembler. 


DEIXANDO O MINI ASSEMBLER 

Para deixar o Mini-Assembler, use urn dos comandos do Monitor, com o sinal dolar como prefixo. 
Para voltar ao Monitor, pule para o enderego FF69 com o comando $FF69G. 

$CTRL-B e $CTRL-C, mandarao para o BASIC, exceto se estiver sendo usado o Applesoft 
em disco ou cassette. Para Applesoft em disco use $3DOG, e para Applesoft em cassette $0G. 


FORMATOS DA INSTRUQAO 

Embora nao seja o objetivo desta sepao ensinar programagao em linguagem assembler, existem cer- 
tos aspectos do Mini-Assembler que devem se- bem conhecidos antes que se possa usa-lo. Primeiro, 
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ele mantem um apontador de instrugao separado do apontador de memoria do Monitor. Deve-se 
acertar este apontador antes de se entrar com instrugoes. Segundo, existem varios formatos de 
instrugoes usados na programagao do microprocessador 6502. Estes formatos dependem em 
grande parte do esquema de enderegamento usado. 

0 microprocessador 6502 tern onze modos de enderegamento, mas apenas seis formatos de 
instrugoes separados. Eles sao descritos abaixo. 

0 primeiro, modo absoluto e direto, requer apenas o enderego de memoria do operando com 
um ou dois bytes. Por exemplo: 

AND $303A 

0 Mini-Assembler nao requer o sinal de dolar ($) antes de enderegos em hexadecimal; ele assume 
que todos os enderegos estao na base 16. 

0 segundo formato e o de enderegamento imediato, como no exemplo: 

LDA 

Veja o sinal (#) como primeiro caractere do operando. Ele e um indicador explfcito de que 
o valor 04 sera carregado no Acumulador. Sem este sinal, o Mini-Assembler interpreta a instrugao 
como "pegue o conteudo da posigao de memoria 0004 e coloque-o no Acumulador", que e uma 
instrugao que referencia enderego absoluto. 

Perceba tambem o uso confuso do termo imediato. Nao confunda enderegamento imediato 
da linguagem assembler com execugao imediata de programa em BASIC. As operagoes sao dife- 
rentes. O termo e o mesmo e e usado de forma ambfgua. 

O terceiro formato e o metodo indexado, que se parece com: 

CMP $23 xX 

ou 

AND $80rY 

Ambas as instrugoes sao semelhantes na medida em que os registradores X e Y aparecem 
como segundo operando. Basicamente, este formato gera uma instrugao em linguagem de maquina 
que adiciona o conteudo do registrador X ou Y ao enderego colocado no primeiro operando, e 
usa a soma como um enderego a ser referenciado pela instrugao. 

Agora, o formato indireto pre-indexado, como neste exemplo 

AND ($F0x X) 

indica que a soma do enderego ($F0) e do conteudo do registrador X aponta para um enderego 
dos primeiros 256 bytes da memoria que, por sua vez, contem outro enderego que aponta o dado 
a ser usado na operagao da instrugao. 

0 modo de enderegamento indireto pos-indexado tern a seguinte forma: 

ORA ($22)xY 

Este formato de instrugao usa o primeiro operando como apontador de um enderego de dois 
bytes, localizado, neste caso, na posigao $22. A instrugao soma o conteudo do registrador Y ao 
enderego encontrado em $22; o dado no enderego derivado e usado na instrugao em linguagem de 
maquina. O Mini-Assembler reconhece enderegamento indireto pos-indexado quando o primeiro 
operando esta entre parenteses, como no exemplo acima. 
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0 enderepamento indireto e um pouco mais direto que o indexado. Aqui esta um exemplo: 

JhP <*22FE) 

Aqui, a instrupao JMP nao carrega o enderepo $22FE no contador de programa. Em vez 
disso, o enderepo de dois bytes da posipao $22FE e carregado no contador de programa. Dessa 
forma, o operando no formato indireto e em verdade um apontador ao iqves de um enderepo 
literal. 


USANDO O MINI ASSEMBLER 

Como visto na sepao anterior, o Mini-Assembler mantem um contador de posipao que e incremen- 
tado do tamanho de cada declarapao em assembler entrada. Em outras palavras, uma vez digitada 
uma declarapao em linguagem de mSquina (toda a vez que se digita uma instrupao), o Mini-Assem¬ 
bler calcula seu comprimento (1, 2 ou 3 bytes) e incrementa o contador de posipao para a linha 
seguinte. 

0 primeiro passo no uso do Mini-Assembler e acertar o contador de posipao. Fapa-o como 
parte da primeira declarapao em linguagem de m^quina digitada. Por exemplo: 

! 8DB0 s L.DA #*Q4 

Imediatamente apos o caractere de entrada do Mini-Assembler, digite o enderepo base para 
os codigos em linguagem de maquina a serem entrados (neste caso, 8DB0), seguido de dois pontos 
(:) e a primeira declarapao em linguagem assembler. Nao sera necesscirio digitar a posipao para a 
declarapao seguinte. 0 Mini-Assembler calcula o enderepo seguinte, a menos que se va colocar 
instrupoes em outro enderepo fora da sequencia, como mostrado acima. 

Uma vez posicionado o contador de posipao, entre as instrupoes em linguagem assembler, 
uma por linha. Apos a primeira linha, entre um espapo seguido pela declarapao seguinte, como aqui: 

* JSR FEME 

Isso leva o Mini-Assembler a calcular o valor seguinte do contador de posipao. 


Uma Sepao de Exemplo 

Esta sepao mostra a operapao do Mini-Assembler passo a passo e em detalhes. 0 seu objetivo e 
criar um pequeno programa que use as entradas de controle de jogo do Apple II e o alto-falante 
para criar sons. 0 procedimento para este programa e ler valores dos paddles 0 e 1, usando a sub- 
rotina PREAD (no enderepo FBI E). 0 valor do paddle 0 dara o intervalo entre os sinais do falante 
(0=menor atraso, FF = maior atraso), e o valor do paddle 1 sera outro intervalo, inversao ao 
paddle 0 (0=intervalo mais longo, FF = intervalo mais curto). 

0 programa inicia em 1D00 e usa o enderepo 1CFF para guardar a leitura do paddle 0. 

Quando se entra cada linha do programa em linguagem assembler, o Mini-Assembler sobre- 
poe a linha entrada com o valor do contador de posipao corrente, codigo de operapao e operando 
em forma de linguagem de maquina (tambem conhecida como codigo objeto), bem como o mne- 
monico da instrupao digitada. Por exemplo: 


•1 DOG¬ 


AS 00 


LDX 


#*00 
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0 contador de posigao e mostrado no im'cio da linha seguido por um trago. Apos esse 
campo, o codigo de operagao (A2 para a instrugao LDX) aparece, seguido pelo ultimo byte da 
instrugao. No caso de instrugoes de tres bytes (aquelas que referenciam enderegos de dois bytes), 
o byte de menor ordem aparece antes do de maior ordem. Por fim, e mostrado o codigo mnemo- 
nico da instrugao. 

0 exemplo mencionado aparece abaixo. Veja que cada linha produzida pelo Mini-Assembler 
aparece aqui sob a linha entrada que a gerou. 


! 1 DOG 

n LDX ! 

IH-00 ^ 

Acerta o contrador de posigao e da a primeira instrugao 

1D00- 

A 2 

00 

LDX 

tt*00 

• JSR 

FBI E 

<- Todos os numeros sao hexadecimais (nao e necessario o prefixo $) 

11)02- 

20 

IE FB 

JSR 

♦ FBI E 

t STY 

1CFF 




1D05- 

8C 

FF 1C 

STY 

% 1 CFF 

• I NX 





1 DOB- 

E8 


I NX 


> JSR 

FBI E 




•1 D0?~ 

20 

IE FB 

JSR 

$FB1E 

1 L DA 

CO 30 




1 DOC- 

AD 

SO CO 

L.DA 

f COSO 

! DEC 

1 CFF 




i DOF- 

CE 

FF 1C 

DEC 

$1 CFF 

1 BNE 

1 DOC 

^ 0 Mini-Assembler 

calcula o salto relativo (F8) 

1D12- 

DO 

F8 

BNE 

$1 DOC 

* L DA 

COSO 




1D14- 

AD 

SO CO 

EDA 

$•0030 

1 r. NY 





1D17- 

C8 


T NY 


i BNE 

ID-14 




1 D1 8- 

DO 

FA 

BNE 

*1D14 

! JMP 

ID 00 




1 D1 A- 

4 C 

00 ID 

JMP 

*1DOO 


Apos digitar este programa, confira. A melhor forma de fazer isso e list^-lo na memoria, de 
preferencia no formato em linguagem assembler. Para isso sera necessario usar o Monitor como se 
vera a seguir. 

Como seguranga adicional, pode-se guardar o programa em cassette (comando W no Monitor) 
ou disco (com a declaragao BSAVE do BASIC). 

Para rodar o programa, pule para o enderego 1D00. Use o comando G no Monitor, ou 
CALL 7424 no BASIC. Opere com os controladores de jogo e veja como eles afetam o alto-falante. 
Para finalizar o programa, acione RESET. 


LISTAGEM DE DESASSEMBLER 

0 Monitor tern um comando que pode ser usado para listar instrugoes de maquina em formato 
de linguagem assembler, mesmo que o Apple II nao tenha o Mini-Assembler em ROM. 0 comando 
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L, de Listar, faz desassembler de 20 instrugoes de linguagem de maquina para declaracoes em 
assembler mostrando-as na tela ou em outro dispositivo selecionado. O comando L usa o contador 
de posigao como apontador para a proxima instrucao a ser operada no desassembler. Dessa forma, 
digite L apos entrar com o programa acima, e o processo se iniciara no endereco 1D1D, sem 
mostrar nada do que foi digitado. 

E bom acertar o contador de posigao ao usar o comando L. Aqui esta a listagem do programa 
exemplo acima: 


i $1DOQL. 

1 DOG- 

f\2 

00 


L..DX 

H$0Q 

1DO 2- 

20 

1E 

FB 

JSR 

$FB1E 

1 DOS- 

8C 

FF 

1 C 

STY 

$1CFF 

•1 DO 8- 

E8 



I NX 


1 DO?- 

20 

IE 

FB 

JSR 

$ F B 1E 

1 DOC- 

AD 

30 

CO 

LDA 

$C030 

1 DOF- 

CE 

FF 

1C 

DEC 

$1 CFF 

1D12- 

DO 

F8 


BNE 

1-1 DOC 

1 D14- 

AD 

30 

CO 

LDA 

$C030 

1 D-17- 

08 



I NY 


1D18- 

DO 

FA 


BNE 

$1 D-1 4 

1 D1 A- 

4 C 

00 

1D 

JMP 

31 DOG 

1 D-1 D- 

?F 



??? 


1 DIE- 

4 E 

A 5 

12 

LSE 

$12. A 5 

1D2-1 - 

A 4 

96 


LDY 

$96 

1D23- 

A3 



??? 


1D24- 

DO 

A 4 


BNE 

$ 1 CCA 

1D26- 

EF 



??? 


1 D27- 

A 4 

62 


LDY 

$62 

1029- 

A 2 

70 


L..DX 

H$70 


Neste caso, as oito ultimas instrugoes do desassembler sao imateriais, porque o programa termina 
no enderego 1D1 A. 

Veja que o comando L e uma facilidade do Monitor, independente do Mini-Assembler, 
(portanto com o dolar como prefixo). Entrando com L (ou $L no Mini-Assembler) e acionando 
RETURN sem dar a posigao inicial do contador, o Monitor lista o desassembler das proximas 
20 instrugoes que encontrar depois das que foram listadas. 


TESTANDO E DEPURANDO PROGRAMAS 

Junto com o Mini-Assembler, o Monitor do Apple II padrao oferece ferramentas de depuragao 
que ajudam muito quando se programa em linguagem assembler. Os programas em linguagem de 
baixo m'vel sao provavelmente os mais dif fceis de depurar e testar. Ao inves de simplesmente mos¬ 
trar conteudo de variaveis, deve-se inspecionar posipoes de memoria, registradores e o programa 
em si. Dois comandos do Monitor, Step e Trace, sao usados para esse proposito. 

Tanto o Step quanto o Trace nao sao dispomveis na versao do Apple II com o Autostart 
Monitor. 
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O Comando Step 

Embora seja bastante facil testar um programa em linguagem assembler observando os sinais de 
execucao de suas operacoes, este nao e um metodo muito eficiente de isolar os erros. Se o pro¬ 
grama e pequeno, fica possi'vel roda-lo passo a passo, verificando os resultados de cada instrupao a 
linguagem de maquina apos sua execucao pelo Apple II. Isso e o que se faz atraves do comando 
Step. 

Quando se executa um comando Step, o Monitor desassembliza e mostra a instrupao apon- 
tada pelo contador de posicoes, executa-a, mostra o conteudo dos registradores do microproces- 
sador, e volta o controle para o Monitor do Apple II. 

0 formato do comando Step e um parametro de enderepo opcional (para posicionar o con¬ 
tador de posipao) seguido da letra S. 

O comando Step abaixo executa a primeira instrucao do nosso programa exemplo de geracao 
de sons. 0 conteudo do registrador X mostrado e 0. Os outros tres registradores cujos conteudos 
sao mostrados nao se alteram. 

*1 DOOS 

1D00- A 2 00 LDX 14*00 

A«FF X00 Y~8C P«32 S=F8 

$ 

Pode-se misturar o comando Step com outros do Monitor (tal como examinar memoria). Para ver 
isso em acao, va atraves do programa de sons ate a instrupao STY na posicao de memoria 1 D05. 
Sera necessario entrar com o comando S nove vezes, porque a instrupao JSR na posicao 1 D02 
chama uma sub-rotina na posipao FB1E e deve-se percorre-la passo a passo ate que se volte para 
1D05. Uma vez la, use o comando de examinar memoria do Monitor para ver a posipao 1CFF. 
A instrupao no enderepo 1D05 guarda o que foi no paddle 0 no endereco 1CFF. 

#8 


1 DOS- 

8C f 

T 1C STY $1CFF 

A= :: FF 

X =:: D 0 

f00 P=32 S*F8 

*1 CFF 



1CFF-* 

Of) 



¥: 


Como se pode ver com o comando de examinar memoria, o conteudo do registrador Y (3F) agora 
esta guardado no enderepo 1CFF. Pode-se tambem misturar outros comandos do Monitor com o 
comando Step. 


O Comando Trace 

Muitas vezes o programa e muito longo para que se execute cada instrupao passo a passo. Em vez 
disso, fica mais interessante que as instrucoes sejam executadas e so se interrompa a execucao 
quando for necessario. 0 comando Trace do Monitor faz isso. Sua safda e semelhante a do Step, 
com excecao ao fato que o Trace elimina o trabalho de se colocar a instrupao Step para cada 
instrupao executada pelo Apple II. Para parar com o comando Trace, acione a tecla RESET ou 
entre a instrupao assembler BRK no programa; quando o Monitor encontra esta instrupao, ele 
devolve o.controle para o teclado (via Monitor). 
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0 formato do comando Trace e constitui'do de um enderego opcional seguido da letra T. 
Aqui esti a primeira parte da execugao do trace no programa de sons do exemplo: 


*1D00T 


1D00- 

A2 00 

LDX 

tt$00 

A-FT 

X==00 Y~8C P--32 

: S=F<! 


1D02- 

20 IE FB 

JBR 

$FB1E 

A--FF 

X==00 Y“BC P~32 

! S“F/ 


FBI E- 

AD 70 CO 

LDA 

$C070 

A ="00 

X“00 Y = :: BC P~ : 32 

S“F4 


FB21- 

AO 00 

LDY 

t*t>00 

A = :: 0 0 

X“00 Y“00 P“32 

S= :: F 4 


FB23- 

FA 

NOP 


A = :: 00 

X=00 Y-00 P=32 

S“F 4 


FB24-- 

FA 

NOP 


A “00 

X==00 Y~00 P“32 

S= :: F4 


FB25- 

BD 64 CO 

LDA 

*C064 r X 

A “00 

X“00 Y"=00 P= :: 32 

S*F4 


FB28- 

10 04 

BPL 

$FB2E 

A “00 

X==00 Y“00 P = :: 32 

S“F4 


FB2F- 

60 

p rs 


A“00 

X•=• 00 Y= :: 00 P==32 

S“F4 


1D05- 

BC FF 1C 

STY 

$1 OFF 

A “00 

X==00 Y“GO P“32 

S«F6 


1 DOB- 

FB 

T NX 


A “00 

X = :: 01 Y“00 P = :: 32 

S“F 6 


1D09- 

20 IF FB 

JSR 

it FB I E 

A“00 

X=01 Y= :: 00 P = 30 

S=F6 


FBI E~ 

AD 70 CO 

LDA 

TC070 

A=27 

X= s Q1 Y=00 P- : 30 

S“F4 


FB21- 

AO 00 

LDY 

#*00 

A= :: 27 

X“01 Y=00 P“30 

B“ F4 


FB23- 

FA 

NOP 


A = :: 2 7 

X“01 Y“00 P“30 

S“F 4 


FB24- 

FA 

NOP 


A=27 

X«01 Y ==00 P“30 

S r - F 4 


FB25-* 

BD 64 CO 

LDA 

$C064•X 

A=-27 

X = 01 Y = 00 P“30 

S“F4 


FB28- 

10 04 

BPL 

$FB2E 

A“27 

X == 01 Y“00 P = :: 30 

S“F4 


FB2E> 

60 

RTS 



A desvantagem em se usar o comando Trace sobre o Step e que se tem menos controle sobre 
a execugao de cada passo do programa. Quando se entra o programa pela primeira vez, deve-se 
colocar a instrugao BRK em pontos-chave. Essas sao as jungoes na logica do programa. E logicoque 
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se pode trocar essas instrugoes por instrugoes NOP (codigo de nao operagao), porem isso nao e 
interessante depois de se ter depurado o programa. 

Adicionalmente, o comando Trace opera numa fragao do tempo gasto pelo programa em lin- 
guagem assembler. Por exemplo, tente substituir no programa exemplo, a instrugao do enderego 
1D1A por um BRK. Digitando o comando 1D00G esta instrugao leva uma fragao de segundo para 
ser executada. Entretanto, digitando 1DOOT, o programa leva de 60 a 70 segundos para ser execu- 
tado. Portanto, tendo um programa grande para ser testado, seja moderado com o comando 
Trace se desejar alguma ajuda dele. 


Mais sobre o Contador de Posicoes 

Como foi mencionado antes na segao sobre o Comando Step, pode-se usar muitos comandos do 
Monitor alternados com o Trace e o Step. Entretanto, existem algumas excegoes a essa regra. Os 
comandos List, Go e o definido pelo usuario CTRL-Y modificam o contador de posigao quando 
sao digitados. Isso altera o fluxo do programa que se esta rastreando a menos que se devolva o 
contador de posigao apos a execugao de qualquer um deles. 0 exemplo abaixo mostra como o 
valor do contador de posigao e alterado usando um desses comandos: 


1D00~ 

A 2 

00 


LDX 

00 


A=62 

x=oo 

Y~:l 

00 P* :: 32 

S*F8 



*$ 







1DG2- 

20 

1E 

FB 

JSR 

$FB1E 


A= :: 62 

X«00 

Y ■••• i 

00 P«32 

S= : F8 



*L 





4 - 

Co 

FEME- 

AD 

70 

CO 

LDA 

$C070 


FB21- 

AO 

00 


LDY 

H $00 


FB23- 

e:a 



NOP 



FB24- 

e:a 



NOP 



FB25- 

BD 

64 

CO 

LDA 

$0064 


FB28- 

1 0 

04 


BPL. 

*FB2E 


FB2A- 

C8 



INY 



FB2B - 

DO 

F8 


BNE 

$FB25 


FB2D- 

88 



DEY 



FB2E- 

60 



RTS 



FB2F-- 

A 9 

00 


LDA 

ft $00 


F B 31 - 

85 

48 


ST A 

$48 


FB33- 

AD 

56 

CO 

LDA 

$0056 


FB36- 

AD 

5.4 

CO 

LDA 

$0054 


FB39- 

AD 

54 

CO 

LDA 

$0051 


FB3C- 

A 9 

00 


LDA 

ft $00 


FB3E- 

F0 

OB 


BEQ 

$FB4B 


FB 40- 

AD 

50 

CO 

LDA 

$0050 


FB 43- 

AD 

5 3 

CO 

LDA 

$0053 



Comando de listar aqui 
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FBA6-- 

20 36 F 

“8 

JSR 

$F"836 

*S 


<- 

Trocando o contador de posigao, o proximo passo 
serS em $FB49 em lugar de $FB 1E 

FB49- 

A 9 14 


LDA 

4 


X= :; 00 Y- : 00 

P«30 

S - F" 6 


*S 

FB4B- 

85 22 


STA 

$22 

* 

X=G0 Y= :: 00 

P-30 

S«F6 



Sub-rotinas Uteis do Monitor 

Em alguns casos, o BASIC nao e suficientemente poderoso para executar todas as fungoes neces- 
s^rias em um programa. Isso, claramente, 6 uma das razoes pelas quais os programadores recorrem 
a sub-rotinas em assembler em seus programas BASIC. Esta segao mostra como referencia-las 
dentro de um programa BASIC. 

Pelo uso de programas em linguagem assembler dentro de BASIC, pode-se criar tantos pro- 
blemas quanto os que se propoe resolver. Em que lugar da memoria ficarS o programa assembler? 
Lembre-se de que a memoria do Apple II tern quatro grandes areas reservadas (pagina de texto, de 
graficos de baixa resolugao e duas paginas de grSficos de alta resolugao). 0 DOS e o interpretador 
do Applesoft tambem usam memoria. Colocar um programa onde nao cause problemas, depende 
do tamanho da memoria e da versao do Apple II usada. 

0 Monitor e a melhor fonte para sub-rotinas em linguagem assembler por tres razoes: pri- 
meiro, sendo em ROM, nao e necessario se preocupar com codigo relocSvel. Segundo, as rotinas 
do Monitor estao depuradas; e ultima, as rotinas intrfnsecas nao usam um byte adicional sequer. 
As sub-rotinas uteis do Monitor estao listadas no Apendice D. 


Incorporando a Sub-rotina 

Decidindo usar uma sub-rotina do Monitor dentro de um programa em BASIC, primeiro certifi- 
que-se que nao ha nada em BASIC equivalente a ela. Isso pode evitar que um programa seja mais 
complicado que o necessario. Em seguida, verifique se a rotina precisa de parametros passados a 
partir do programa em BASIC. Se for necessario atribuir valores aos registradores do microproces- 
sador antes de executar a sub-rotina, ou se o seu resultado vem dentro de registradores, sera neces¬ 
sario usar instrugoes em assembler adicionais para interfacear com o BASIC. Muitas sub-rotinas 
do Monitor nao precisam de parametros do BASIC; aquelas que precisam, em geral tern equiva- 
lentes no BASIC. 

Uma vez sabido qual sub-rotina usar, e aconselhavel documenta-la a fim de tornar mais 
clara a operagao. Por exemplo, CALL-936 limpa a tela e coloca o cursor no alto a esquerda. Uma 
forma de tornar esse CALL mais descritivo e gerar uma variavel no ini'cio do programa, como 
aqui: 

10 LIMP TEL.A--936 

e para referenda mais tarde no programa: 
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1510 CALL LIHP TELA 

Isso torna a fungao mais clara a qualquer um que mais tarde venha a ler o programa, porem 
insere uma variavel a mais. Esses elementos de estilo tornam o programa bem mais facil de serem 
lidos e entendidos. 


Problemas a Evitar 

Tendo um editor/assembler dispomvel para o Apple II, e facil relocar programas reposicionando o 
ponto de origem e reassemblizando. Por outro lado, pode-se escrever uma sub-rotina em linguagem 
de mSquina com o Mini-Assembler, usada com o BASIC. Esta alternativa pode gerar problemas 
de incompatibilidade, tendo-se muitas vezes necessidade de reescrever a sub-rotina para outra 
versao do Apple II com tamanho de memoria diferente. Isso acontece quando se usam areas de 
memoria ocupadas com o DOS, as paginas graficas ou o Applesoft em disco ou cassette. Use as 
sub-rotinas do Monitor sempre que possfvel. 

Com programas em Applesoft, use sempre a fungao USR se tiver que passar parametros de 
ou para a sub-rotina, ao inves da declaragao CALL. Os enderegos 9D ate A3 guardam valores 
passados pelo USR, e pode-se usar esta area para passar parametros de volta ao BASIC. Use a decla¬ 
ragao POKE para colocar a instrugao JUMP nas posigoes 10 ate 12 (0A ate 0C hexadecimal). 
Estas posigoes devem conter uma instrugao JUMP para o im'cio da sub-rotina em linguagem de 
maquina chamada pelo USR. 


INTEGRAgAO DO PROGRAMA COM O BASIC 

Em BASIC, as declaragoes LOMEM: e HIMEM: protegem o programa em assembler de ser "suja- 
do" pelo BASIC. Existem algumas restrigoes na determinagao de um programa em linguagem 
assembler se tambem tivermos o Applesoft em disco ou cassette ou ainda o DOS na memoria 
ao mesmo tempo. A forma geral ao se usar sub-rotinas em assembler com programa em BASIC 
e a seguinte: 

1. Carregue o DOS. 

2. Carregue o interpretador Applesoft do disco ou cassette, se necessario. 

3. Informe os valores para LOMEM: e HIMEM:. 

4. Carregue o programa em linguagem assembler. 

5. Carregue o programa BASIC do disco ou fita (ou digite-o). 

O DOS e o interpretador Applesoft mexem com o HIMEM: apos serem carregados. Deve-se 
reposicionar LOMEM: e HIMEM: para dar espago ao programa em assembler, e em seguida car- 
rega-lo em lugar seguro. Em seguida, carregar e rodar um programa BASIC afetarS apenas a 2rea 
entre o LOMEM: e o HIMEM:. 

Para maior ajuda em como achar espago para programas em linguagem assembler, veja o 
mapa de memoria no Apendice G. Veja tambem as references ao LOMEM: e ao HIMEM: no 
Capftulo 8. 


8 

Compendio de 

Declaracoes do Basic 

# 


Este capitulo descreve a sintaxe de todas as declaragoes e funcoes do BASIC do Apple II. As decla¬ 
ragoes sao descritas em primeiro lugar, listadas em ordem alfabetica. A seguir vem as fungoes, 
descritas e listadas tambem em ordem alfabetica. 

Este capi'tulo serve como referenda para todas as declaracoes e fungoes. 0 Capi’tulo 3 ate o 
7 descrevem conceitos de programagao. Sao tambem dados exemplos de emprego de fungoes e 
declaragoes em programas. 


MODOS IMEDIATO E PROGRAMADO 

Muitas declaragoes podem ser executadas em modo imediato ou programado. A menos que se espe- 
cifique o contrario, assuma que uma declaragao pode ser usada em ambos os modos. As excegoes 
sao identificadas. Existem declaragoes que sao restritas a um modo de operagao, nao funcionando 
no outro, outras existem que, embora operando nos dois modulos, somente em um deles sao 
praticas. 

Algumas declaragoes se reportam ao DOS (Disk Operating System). Elas podem ser emprega- 
das em modo imediato, como foi mostrado. Em modo programado, entretanto, elas devem ser 
inseridas como parte de uma declaragao PRINT, antecedidas pelo caractere Ctrl-D (codigo 
ASCII 04). Assim, as duas declaragoes abaixo sao equivalentes: 

.] CATALOG 

1 P RINT CHR $< A)? "CATALOG" 

Veja que em vez de se usar CHR$(4) como visto acima, pode-se digitar o sinal de aspas, 
seguido por CTRL-D, e outro sinal de aspas. Na tela so aparecerao as duas marcas de aspas, sem 
nada entre elas. 0 caractere CTRL-D estara la, porem nao podera ser visto. 
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versOes do basic 

Todas as declaragoes e fungoes sao dispomveis tanto em Integer BASIC quanto em Applesoft a 
menos que seja especificado o contrario. Onde uma declaragao ou fungao operar diferentemente 
para as duas versoes, havera a anotagao. 

convencOes de nomenclatura e formato 

Usaremos um esquema padrao para apresentar a forma geral de cada declaragao e fungao. Abaixo 
estao listadas pontuagoes e outras convengoes mecanicas que usamos. 


{ } 

[ ] 

Chaves indicam uma escolha de itens. Um dos itens do grupo deve estar 
presente; as chaves nao aparecem em uma declaragao real. 

Colchetes indicam que o parametro interno e opcional; os colchetes nao 
aparecem em uma declaragao real. 

Indica que o procedimento anterior pode se repetir; nao aparece em uma 
declaragao real. 

Numero de 

linha 

Um numero de linha inicial e sempre aplicado para declaragoes em modo 
programado. 

Outras 

Todas as outras marcas de pontuagao — virgulas, dois pontos, aspas e 


pontuagoes parenteses — devem aparecer como mostrado. 

MAIUSCULAS As palavras em maiusculas devem aparecer exatamente como mostrado. 


Ita/icos 

Itcilicos sao usados para termos genericos. 0 programador informa a pala- 


vra ou valor exato, de acordo com a forma generica descrita abaixo. 


Os termos genericos em italico seguintes sao usados em definigao de declaragoes e fungoes. 
Qualquer termo italico nao listado aqui e particular aquela fungao em que aparece, e la e descrito. 


col 

Numero de coluna para grafico de baixa resolugao; uma expressao nume- 

colh 

rica que tern valor entre 0 e 39. 

Numero de coluna de grafico de alta resolugao; uma expressao numerica 
que pode ter valor entre 0 e 279. 

const 

Qualquer constante numerica ou cordao. 

D n 

Um numero de drive de disco deve ser especificado como D1 ou D2. 

expr 

Um cordao numerico, constante relacional ou Booleana (apenas em 
Applesoft), variavel ou expressao; qualquer combinagao destas. 

expr$ 

Qualquer constante cordao, variavel ou expressao. 

exprnm 

Qualquer constante numerica, variavel ou expressao. 

nomearq 

linha 

Qualquer nome de arquivo. 

Qualquer numero de linha de programa BASIC. 


260 


APPLE II 


linha,- 

endmem 


posmem 


mensagem 

linha 

linhah 

Sn 

var 

vamm 

var(sub) 

\Jn 


Um dos Vcirios numeros de linha do programa BASIC. 

Uma expressao numerica, variavel ou constante que se relaciona a um 
enderepo de memoria. Os enderepos de memoria variam de —32767 
a 32767, ou em Applesoft, de 0 a 65535, onde —65535 e equivalente 
a 1, -65534 a 2 etc. 

Uma posipao de memoria especificada por um inteiro constante entre 0 
e 65535 (decimal) ou $0 a $FFF (hexadecimal). As constantes hexa¬ 
decimal sao identificadas pelo sinal de dolar ($) a frente. 

Qualquer cordao de texto entre aspas. 

Numero de linha em grafico de baixa resolupao; uma expressao numerica 
com valor entre 0 e 47. 

Numero de linha em grafico de alta resolupao; uma expressao numerica 
com valor entre 0 e 191. 

Numero do slot para entrada e sai'da; deve ser SO, SI, S2, S3, S4, S5, S6 
ou S7. 

Em Integer BASIC, uma variavel numerica ou cordao. Em Applesoft, 
qualquer variavel numerica, inteira ou cordao. 

0 nome de uma variavel numerica. 

Em Integer BASIC, o nome de uma variavel numerica subscrita. Em 
Applesoft, qualquer variavel inteira, numerica ou cordao. 

Qualquer numero de volume para identificapao de disco (entre VO e 
V255). 


DECLARAgOES 


APPEND 

Abre um arquivo (veja OPEN), e posiciona o apontador do arquivo no final. 


Formato: 


APPEND nomearq [, D n] [, Sn] [, V/?] 

Uma area de buffer de 595 bytes e alocada para o arquivo de texto especificado. Ele deve ser 
sequencial. 0 comando WRITE pode agora ser usado para guardar dados no disco, iniciando no 
primeiro byte nao usado. Isso sera imediatamente a frente do ultimo caractere do arquivo, a menos 
que existam bytes nao usados no meio. 

Ocasionalmente, o APPEND pode nao comepar no primeiro byte nao usado do arquivo (em 
geral no fim). Em vez disso ele comepa no infcio do arquivo (Horror!). Para certificar-se de que 
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TABELA 8.1. Determinagoes em Linguagem de Maquina para o APPEND. 


LINGUAGEM DE MAQUINA 

LINGUAGEM ASSEMBLER DO 6502 

Decimal 

Hexadecimal 

Instrugao 

Comentario 

169 

A9 

LDA $0 

A rotina do Monitor em $FDED 

o 

0 


poe o caractere do registrador A 

76 

4C 

JMP $FDED 

($0 no caso) no dispositivo de 
sai'da corrente, o disco. Veja 

237 

ED 


Apendice D. 

253 

FD 




isso nao ocorreu, seu programa deve sempre gravar uma indicagao de fim de arquivo antes de fechS- 
lo. Uma pequena rotina em linguagem de maquina, descrita na Tabela 8.1 faz isso. Coloque com 
POKE as instrugoes em qualquer lugar da memoria onde existirem 5 bytes livres (posigoes de 768 
ate 772 sao boas a menos que ja estejam sendo usados para outra coisa). Chame entao a sub-rotina 
(CALL) antes de dar a instrugao de fechar o arquivo. 

Se o arquivo nao existe no drive Dn do slot Sn, aparece a mensagem FILE NOT FOUND. 
Se o disco no drive Dn do slot Sn nao tern volume V/7, aparece a mensagem de erro VOLUME 
MISMATCH. VO serve para qualquer disco. Se o arquivo ja esta aberto, o APPEND o fecha e 
reabre (veja CLOSE). 

Dn, Sn e \/n podem ser especificados em qualquer ordem. Se Dn ou Sn e omitido, o drive 
ou slot referenciado por ultimo e usado. VO se aplica quando V/7 esta ausente. Tambem, n pode 
estar ausente; serao usados DO, SO ou VO. 

0 APPEND e urn comando do DOS, requerendo PRINT e CTRL-D em modo programado. 

Nao pode ser usado em modo imediato. 


AUTO 

Gera numeragao autom^tica de linha em Integer BASIC. 


Formato: 


AUTO linha [, incremento] 

Os numeros de linhas sao mostrados automaticamente a cada vez que se digita a tecla RETURN, 
iniciando com linha, e incrementando cada vez de incremento, com a adogao de 10 se nao for 
especificado. Digite Ctrl-X para limpar um numero de linha automatico; a numeragao automa- 
tica continua a menos que se digite MAN na linha de texto (veja MAN). 

So pode ser usado em modo imediato. 

Nao e dispom'vel em Applesoft. 








262 


APPLE II 


BLOAD 

Pega um arquivo binario do disco e guarda em um setor especi'fico da memoria. 

Formato: 


BLOAD nomearq [, A posmem] [, D/7] [, S/7] [, V/7] 

Se o parametro A esta ausente, o arquivo especificado e colocado na memoria a partir da posigao 
de onde foi tirado na gravagao (veja BSAVE). Se o parametro A esta presente, o arquivo vai para 
a memoria para posmem. 

0 BLOAD deve ser usado com cuidado. Aquilo que estiver na area de memoria onde ele 
coloca o arquivo (como um programa, o Applesoft, DOS etc.) sera destrui'do. 

Se o arquivo nao existe no drive D n no slot Sn, aparece a mensagem FILE NOT FOUND. 
Se o disco do drive Dn do slot Sn nao tiver o volume V/7, resulta no erro VOLUME MISMATCH. 

D/7, Sn e V/7 podem ser especificados em qualquer ordem. Se Dn ou Sn sao omitidos, o drive 
ou slot referenciados por ultimo sao assumidos. Usa-se VO se V/7 esta ausente. 

Este e um comando do DOS, requer PRINT e Ctrl-D em modo programado. 

BRUN 

Pegue um arquivo binario (que poderia ser um programa em linguagem de maquina), guarda-o 
numa posigao especi'fica de memoria, e executa um salto em linguagem de maquina (JMP no codi- 
go assembler do 6502) para a posigao inicial de memoria. 

Formato: 


BRUN nomearq [, A posmem] [, D/ 7 ] [, S/ 7 ] [, V/ 7 ] 

Se o parametro A estS ausente, o arquivo especificado e colocado na memoria iniciando na posigao 
de onde ele foi tirado para gravar (veja BSAVE). Se o parametro A estiver presente, o arquivo e 
colocado a partir da posigao posmem. 

Um programa em linguagem de maquina pode operar bem em qualquer posigao de memoria. 
Cuidado com as instrugoes que sao dependentes de enderego antes de carregar o programa para 
uma area diferente de memoria. 0 BRUN destroi tudo que estiver na area de memoria onde ele 
coloca o arquivo; isso pode destruir o Applesoft ou o DOS no processo. 

Se o arquivo nao existe no drive Dn, aparece a mensagem de erro FILE NOT FOUND. 
Se o disco no drive Dn e slot Sn nao tern o volume V/7, aparece a mensagem de erro VOLUME 
MISMATCH. 

Dn, Sn e V/7 podem ser especificados em qualquer ordem. Se Dn e Sn sao omitidos, o drive e 
slot referenciados por ultimo sao usados. Usa-se VO quando V/7 esta ausente. 

Este e um comando DOS, e requer PRINT e Ctrl-D em modo programado. 

BSAVE 

Cria um arquivo em disco e guarda uma area de memoria do Apple II nele, em binario. 
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Formato: 


BSAVE nomearq, Aposmem, Lcompr [, D/ 7 ] [ ,S/7] [, V/ 7 ] 

0 parametro A especifica o endereco inicial da area de memoria a ser gravada. O parametro L da 
o numero de bytes a guardar. compr deve ser um inteiro entre 0 e 32767 (decimal). Tambern pode 
ser em hexadecimal, quando fica precedido pelo sinal dolar ($). 

Se o disco no drive D/7 do slot Sn nao tern o volume V/7, ocorre o erro VOLUME MIS¬ 
MATCH. 

D/7, Sn e V/7 podem ser especificados em qualquer ordem. Se D/7 ou Sn e omitido assume-se 
o ultimo drive ou slot que foi acessado. Usa-se VO se V/7 esta ausente. Tambern o n pode estar 
ausente, e no caso e adotado DO, SO e VO. 

Este e um comando DOS, requer PRINT e Ctrl-D quando usado em modo programado. 


CALL 

Pula para rotina em linguagem de maquina num endereco especi'fico. 


Formato: 


CALL end mem 

0 CALL pode ser usado com sub-rotinas que se escrevem, ou mesmo com sub-rotinas intrmsecas 
tais como as listadas no Apendice D. 


CATALOG 

Mostra uma lista com todos os arquivos de um disco especificado. 


Formato: 


CATALOG l, D/7J [, S/7J 

0 CATALOG primeiro imprime DISK VOLUME seguido pelo numero de volume do disco. Se o 
parametro V/7 e inclufdo no comando CATALOG, e ignorado. 

A lista de arquivos do disco e mostrada abaixo do numero de volume. Para cada arquivo, o 
CATALOG coloca um codigo literal indicando o tipo de arquivo, o numero de setores requeridos 
para guardar o arquivo, e seu nome. Um asterisco aparece a esquerda do tipo de arquivo se ele esta 
bloqueado (veja LOCK). Os tipos de arquivo e seus codigos sao: 

I Programa em Integer BASIC 

A Programa em Applesoft 

T Arquivo de texto 

B Arquivo binario (linguagem de maquina) 
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Se o tamanho do arquivo excede 255 setores, o comprimento e dado como modulo 255; ou 
seja, 0 para 256, 1 para 257 etc. 

Dr? e Sr? podem ser especificados em qualquer ordem. Se D/7 ou Sn sao omitidos, o drive 
referenciado pela ultima vez e usado. 

Este e urn comando DOS, e requer PRINT e CTRL-D quando usado em modo programdo. 


CHAIN 

Carrega e roda urn programa em Integer BASIC a partir do disco, sem limpar os valores de qualquer 
variavel ou arranjo. 


Formato: 


CHAIN nomearq [, D/7] [, Sn] [, V/7] 

0 comando CHAIN so pode ser usado em Integer BASIC, e apenas para carregar programas em 
Integer BASIC. 

Se o arquivo nao existe no drive D n e slot Sn, aparece a mensagem de erro FILE NOT 
FOUND. Se o disco no drive D n e slot Sn tiver volume V/7, aparece a mensagem de erro VOLUME 
MISMATCH. 

D/7, Sn e V/7 podem ser especificados em qualquer ordem. Se D n ou Sn sao omitidos, o drive 
referenciado por ultimo e usado. Usa-se VO para V/7 ausente. Tambem n pode estar ausente, quan¬ 
do sao usados DO, SO e VO. 


CLEAR 

Esta declaragao do Applesoft zera todas as variaveis numericas e elementos de arranjos. Tambem 
atribui um valor nulo a variaveis cordao e elementos de arranjos tipo cordao. 


Formato: 


CLEAR 

Executar esta declaragao equivale a desligar o Apple II, liga-lo de novo e carregar o programa na 
memoria. Um programa existente na memoria continuara rodando normalmente apos os CLEAR 
pois ele nao afeta a logica de programas. 

Em Integer BASIC, use CLR. 


CLR 

Este comando do Integer BASIC atribui valor 0 a variaveis e elementos de arranjos e valor nulo a 
variaveis tipo cordao. 
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Formato: 


CLR 

Ele tambem retira o dimensionamento de arranjos e cordoes. Pode-se imprimir valores de arranjos 
apos a execucao da declaragao CLS, desde que nao tenha sido atribufdo valores a nenhuma variavel 
nesse interim. 

0 CLR so pode ser usado em modo imediato. 

Em Applesoft, use CLEAR. 


CLOSE 

Desaloca o buffer usado pelo arquivo em disco especificado, e se a ultima operagao com disco foi 
de gravagao, guarda a informagao restante do buffer no disco. 


Formato: 


CLOSE [nomearq\ 

Deve-se FECHAR todos os arquivos onde se gravou qualquer informagao por declaragao WRITE 
para que se tenha os dados de forma integral. Se nomearq esta presente, apenas aquele arquivo e 
fechado. Por ausencia de nomearq, fecham-se todos os arquivos (a excegao do arquivo EXEC, que 
esta controlando). 

Com DOS 3.2.1 e mais recentes, urn arquivo sequencial ira ocasionalmente preencher um 
setor quando e fechado. Sob essas condigoes, um APPEND subsequente ira apontar o arquivo em 
seu im'cio ao inves de seu fim. Para contornar isso, chame a sub-rotina em linguagem de maquina 
da Tabela 8.1 antes do comando CLOSE. Pode-se colocar a sub-rotina em qualquer lugar da 
memoria usando declaragoes POKE e ela usa cinco bytes (exemplo, posigoes de 768 a 772, a 
menos que ja esteja usada). 

Este e um comando do DOS, e requer PRINT e Ctrl-D em modo programado. 


COLOR- 

Gera cor para graficos de baixa resolugao. 


Formato: 


CO LOR — exprnm 

Depois da ultima declaragao COLOR, toda declaragao PLOT, VLIN e HLIN ficara na cor especi- 
ficada. Os codigos das cores sao listados na Tabela 8.2. 0 valor de exprnm deve estar compreen- 
dido entre 0 e 255; valores reais sao convertidos para inteiros. Valores maiores que 15 repetem as 
cores mostradas na Tabela 8.2 (0, 16, 32 etc., dao preto etc.). 

Por ausencia, fica adotado COLOR —0. 
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TABELA 8.2. C6digos de Cores em Baixa Resolupao. 


C6digo 

Cor 

C6digo 

Cor 

C6digo 

Cor 

Codigo 

Cor 

0 

Preto 

4 

Verde Escuro 

8 

Marrom 

12 

Verde 

1 

Magenta 

5 

Cinza 

9 

Laranja 

13 

Amarelo 

2 

Azul Escuro 

6 

Azul M6dio 

10 

Cinza 

14 

Agua 

3 

Purpura 

7 

Azul Claro 

11 

Rosa 

15 

Branco 


A declaragao COLOR nao tern efeito quando se est£ usando grafico em alta resolupao. 
Dentro do modo texto, COLOR 6 um fator na determinapao de que caractere e colocado na tela 
pela declaragao PLOT. Para uma descrigao detalhada dessa propriedade, veja PLOT. 


CON 

Este comando do Integer BASIC devolve a execupao de um programa na instrugao seguinte a 
parada. 


Formato: 


CON 

0 CON opera apos a execupao de uma parada com CTRL-C, e por vezes apos o RESET. Se nao 
houver interrupgao do programa, o CON simplesmente trava o sistema. Um programa nao pode 
continuar se foi interrompido por CTRL-C numa declaragao de entrada tipo INPUT. 

Se uma linha de programa foi inserida ou retirada, ou foi gerada uma mensagem de erro 
desde a interrupgao ocorreu, o CON podera rodar normalmente, ou por vezes travar o sistema ou 
mesmo gerar mensagem de erro. 

0 CON so pode ser usado em modo imediato. 

Para Applesoft, veja CONT. 


CO NT 

Este comando do Applesoft devolve a execupao na proxima instrugao apos a parada. 


Formato: 


CONT 

0 CONT opera apos a parada do programa com STOP, END ou CTRL-C. Se uma declaragao 
INPUT for interrompida com Ctrl-C, o programa nao pode ser continuado. Se nao houver 
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interrupgao de programa, ou houve colocagao ou aumento de uma linha de programa, ou se foi 
gerada uma mensagem de erro depois do programa ter sido interrompido, o CONT produzirS a 
mensagem de erro ?CON'T CONTINUE ERROR. 

Para Integer BASIC, veja CON. 


DATA 

Cria uma lista de valores a serem usados pela declaragao READ no Applesoft. 


Formato: 


DAT A cont [, const. . . ] 

A declaragao DATA pode aparecer em qualquer lugar do programa, ela nao precisa ser executada 
para ser acessada por uma declaragao READ. 

A declaragao DATA especifica tanto valores numericos quanto alfanum£ricos (cordoes). 
Constantes de cordoes sao geralmente colocadas entre colchetes; esses colchetes nao sao neces- 
sarios a menos que o cordao tenha espagos, vfrgulas ou dois pontos. Um sinal de colchete nao pode 
ser usado como const; ele deve ser especificado usando a fungao CHR$(34). 

Um ou mais parametros const podem ser nulos, ou seja, apenas espagos em branco. Uma 
constante nula e colocada em zero em valores numericos, e um cordao nulo (" ") na variSvel 
cordao. 

Nao ser3 dada mensagem de erro ao se tentar entrar DATA em modo imediato mas, porem 
os dados nao serao lidos dentro do programa com READ. 

Nao dispom'vel em Integer BASIC. 


DEF FN 

A declaragao DEF FN permite fungoes de aplicagao especi'fica a ser definida e usada dentro de 
programas em Applesoft. 


Formato: 


DEF FN nvar ( arg)=exprnm 

A variavel real nvar identifica a fungao, que e chamada posteriormente usando o nome FNnvar. 

A declaragao fungao e definida por exprnm. arg e um nome de variavel fictfcio que pode 
estar (e em geral esta presente em exprnm. Seu uso na declaragao DEF FN nao tern efeito em qual¬ 
quer outra variavel com o mesmo nome em qualquer outro lugar do programa. 

Quando F Hnvar e chamada, o valor da variavel fictfcia e especificado por uma expressao 
numerica, variavel ou constante. Os valores de todas as variaveis em exprnm devem ser definidos 
antes de FN nvar ser chamada. Veja tambem FN na segao de fungoes deste capftulo. 

A declaragao DEF FN inteira deve aparecer numa unica linha de programa. Entretanto, 
uma fungao definida anteriormente pode ser inclufda em exprnm, de forma que podem ser desen- 
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volvidas funpoes da complexidade que se desejar. Entretanto, uma funcao definida por usuario 
nao pode referenciar a si propria, direta ou indiretamente (chamando uma funcao que, por sua 
vez, a chame). 

0 nome de funcao nvar pode ser usado novamente, e tambem ser redefinido para outra 
declarapao DEF FN que aparepa depois, no mesmo programa. 

Nao disponfvel em Integer BASIC. 

A declarapao de definipao DEF FN e ilegal em modo imediato. Entretanto, uma funpao que 
tenha sido definida apos o ultimo NEW, CLEAR ou LOAD pode ser referenciada em modo ime¬ 
diato. 


DEL 

Elimina as linhas de programa especificadas. 


Formato: 


DEL I in i , lin 2 

Toda a linha de programa maior ou igual a lin l e menor ou igual a lin 2 e removida do programa 
presente na memoria. Se Un\ nao existe, a eliminapao inicia na linha seguinte. Se lin 2 nao existe, 
ela termina na linha anterior. 

DEL deve ser seguido por dois numeros de linha separados por vi'rgula. Nenhum deles pode 
ser negativo, e o segundo deve ser maior ou igual ao primeiro. Se os numeros forem identicos, uma 
linha (no mdximo) sera eliminada. 

0 DEL so pode ser usado em modo imediato no Integer BASIC. 

Se DEL for usado em modo programado (possi'vel apenas em Applesoft), a eliminapao ocorre 
e o programa para. CONT nao continua a execupao neste caso. 


DELETE 

Retira um arquivo do disco. 


Formato: 


DELETE nomearq [, D/7] [, S/?] [, V/ 7 ] 

0 arquivo especificado e removido do disco. 

Se ele nao existir no drive D n do slot S/7, aparecer4 a mensagem de erro FILE NOT FOUND. 
Se o disco no drive D n no slot S/7 nao tiver volume V/7, resultar^ em erro VOLUME MISMATCH. 

D/7, S/7 e V/7 podem ser especificados em qualquer ordem. Se forem omitidos, o ultimo drive 
referenciado sera usado. VO e usado quando V/7 estiver ausente. Tambem n pode ser omitido, 
sendo entao usado DO, SO e VO. 

Este e um comando do DOS, e requer PRINT e Ctrl-D em modo programado. 


COMPIzNDIO DE DECLARACOES DO BASIC 


269 


DIM 

Reserva espapo na memoria para um arranjo ou cordao. 

Devido as grandes diferenpas entre o Integer BASIC e o Applesoft, o DIM e estudado abaixo 
em cada uma das versdes do Apple II. 


Formato em Integer BASIC: 

DIM var (sub) [, var (sub) . .. ] 

Em Integer BASIC so se pode definir arranjos de uma dimensao e variaveis tipo cordao simples. 

Quando se dimensiona um arranjo, e reservado espapo na memoria para o numero de elemen- 
tos mais 1. Eles sao numerados de 0 ate sub. O elemento 0 de um arranjo e igual a variavel simples 
de mesmo nome (exemplo: A(0) = A). 

A declarapao DIM fornece o comprimento maximo de variaveis tipo cordao. Neste caso ,sub 
e o comprimento do cordao. 

Todo sub subscrito deve estar entre 1 e 255 na declarapao DIM. Alem disso, o maior dimen- 
sionamento permitido esta vinculado ao espapo de memoria existente. 

a 6 se referenciar um arranjo usando uma subscripao maior que aquela declarada em DIM, 
a mensagem *** RANGE ERR ocorre. Ao se tentar usar mais caracteres que o dimensionado em 
cordoes aparece a mensagem *** STRING ERR. 

0 DIM nao atribui nenhum valor particular as variaveis do arranjo quando e executado. Por 
isso, deve-se inicializar qualquer arranjo (por exemplo, o zero) apos dimensiona-lo. Variaveis tipo 
cordao, por outro lado, sempre tern valor nulo apos serem dimensionadas. 


Formato em Applesoft: 

DIM var (sub [, sub ...])[, var (sub [, sub ...])...] 

A declarapao DIM identifica arranjos com uma ou mais dimensoes, como segue: 

var (sub, ) Arranjos de dimensao simples 

vex (subj,subj) Arranjos de duas dimensoes 

var (subj,subj,subi( . . . ) Arranjos de dimensoes multiplas 

0 Applesoft permite tres tipos de arranjos: inteiro, real e cordao. Cada elemento de um 
arranjo e de um tipo especificado pelo nome da variavel usada para nome do arranjo. 0 numero de 
dimensoes do arranjo e dado pelo numero de subscritos usados na declarapao DIM. Quando um 
arranjo e referenciado, cada subscrito deve estar dentro da faixa de 0 ate sub, onde sub e o subs* 
crito correspondente a mesma variavel na declarapao DIM. 

0 numero de dimensoes em um arranjo e limitado pela quantidade de memoria dispom'vel. 
O numero maximo de dimensoes de um arranjo pode ser ate 88, e isso so e possfvel quando muitos 
dos subscritos forem 0. Um DIM com 89 ou mais subscritos, ou um que fapa exceder as limitapoes 
de memoria produzira a mensagem de erro ?OUT OF MEMORY ERROR. 

Ao se tentar usar um elemento de arranjo com subscrito fora da faixa ou com numero de 
subscritos errado, a mensagem de erro ?BAD SUBSCRIPT ERROR aparece. 
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Se um elemento do arranjo e referenciado antes que o DIM correspondente seja executado, 
o Applesoft atribui o valor de 10 para cada subscrito. A partir daf o arranjo e tratado como se 
tivesse sido dimensionado em 10 para cada dimensao. 

Um arranjo nunca pode ser dimensionado duas vezes, mesmo que um deles tenha sido di¬ 
mensionado por ausencia. Ao se tentar dimensionar um arranjo ja dimensionado, recebe-se a 
mensagem de erro ?REDIM'D ARRAY ERROR. 

DRAW 

Esta declaragao do Applesoft desenha uma forma grafica de alta resolugao na tela. 


Formato: 


DRAW exprnm [ AT colh, linh ] 

A forma identificada pelo valor inteiro de exprnm e desenhada na cor determinada pela 
declaragao HCOLOR executada por ultimo. A escala e rotagao da forma deve ser indicada por 
comandos SCALE e ROT antes de se dar o DRAW. 

0 desenho inicia no local dado pelo valor inteiro da expressao numerica colh e linh. Se nao 
for especificada a posigao na declaragao DRAW, a forma inicia no ultimo ponto indicado pelo 
ultimo comando DRAW, XDRAW ou HPLOT realizado. 

0 numero da forma especificado ( exprnm) deve estar entre 0 e o numero de formas da 
tabela (que nao pode exceder a 255), inclusive. 

Evite usar DRAW se nao houver tabela de formas na memoria. 0 sistema pode travar, ou 
pode-se obter uma forma sem sentido na tela. Se o seu programa se estende ate uma area de 
memoria de alta resolugao, ele tambem pode vir a ser destrui'do. 

Nao dispom'vel em Integer BASIC. 


DSP 

Apresenta a variagao de valores de variaveis na execugao de um programa em Integer BASIC. 


Formato: 


DSP var 

0 valor da variavel var e o numero de linha corrente sao mostrados sempre que o valor dessa varia- 
vel e alterado. Essa mostragem pode interagir com os dados sai'dos de seu programa, tornando um 
ou ambos ininteligTveis. 0 RUN cancela todos os DSP dados. Use CON ou GOTO ao depurar 
programas com o DSP em modo imediato. 

Para desligar o DSP, use NO DSP. 

Nao disponfvel em Applesoft. 
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END 

Causa parada no programa. 

Formato: 


END 

Nao e colocada nenhuma mensagem. Em Integer BASIC, o END deve ser a ultima instrugao exe- 
cutada ou a mensagem *** NO END ERR aparece. 0 END e opcional em Applesoft. 

Nao pode ser usado em modo imediato no Integer BASIC. 


EXEC 

Executa urn arquivo de texto em disco como se cada caractere fosse digitado no teclado. 


Formato: 


EXEC nomearq [, Rrt] [, Dfl] [, Sn] [ , V/ 7 ] 

Urn arquivo de texto a ser usado com EXEC deve conter combinagao de comandos BASIC, co- 
mandos DOS e linhas de programa. Quando EXEC e executado, a primeira linha do arquivo espe- 
cificado e lida do disco. Se for comando, ele sera executado imediatamente; se for linha de pro¬ 
grama, ira para a memoria, exatamente como se tivesse sido entrado pelo teclado. 

Urn arquivo EXEC pode ser usado para entrar um programa inteiro, lista-lo, execut^-lo, 
guarda-lo no disco, traze-lo de volta, e qualquer outra coisa que se pode fazer a partir do teclado. 
Pode-se ate usar um arquivo EXEC para criar e executar outro arquivo EXEC. 

0 parametro R, se presente, especifica qual campo do arquivo sera executado primeiro. 
Quando usado com o EXEC, o parametro R sempre conta a partir do im'cio do arquivo: o primeiro 
campo do arquivo e o campo 0, o segundo e o 1 etc. 0 numero que segue o R deve ser uma cons- 
tante inteira entre 0 e 32767. Se Rn especificar o ultimo campo apos o fim de arquivo, nada 
acontece. Se ele especifica dois ou mais campos depois do fim de arquivo, aparece a mensagem 
END OF DATA. 

Se uma declaragao INPUT e executada enquanto o arquivo EXEC esta aberto, a resposta 
e tirada do arquivo EXEC. 

Quando a ultima linha de um arquivo foi executada, o arquivo EXEC fecha a si mesmo 
(veja CLOSE). Quando um comando EXEC e encontrado num arquivo de controle EXEC, o 
arquivo original e fechado e qualquer outro comando dele e ignorado; o novo arquivo EXEC e 
aberto e passa a operar normalmente. 

Se o arquivo nao existe no drive D n do slot Sn, aparece a mensagem FILE NOT FOUND 
de erro. Se o disco no drive D n do slot Sn nao tern volume V/7, aparece um erro VOLUME MIS¬ 
MATCH. 

Dr?, Sr7 e \Jn podem ser especificados em qualquer ordem. Se D n, e Sn sao omitidos, o drive 
referenciado por ultimo e adotado. VO e usado por ausencia de Mn. Tambem n pode estar ausente, 
quando se adota DO, SO e VO. 

Este e um comando do DOS, requer PRINT e CTRL-D em modo programado. 
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FLASH 

Esta declarapao do Applesoft faz os caracteres do vi'deo piscarem. 


Formato: 


FLASH 

Toda a sai'da por PRINT subsequente ficara sendo mostrada alternativamente em branco-sobre- 
preto e preto-sobre-branco. As mensagens de erro tambem sao dadas nessa forma. Entretanto, os 
caracteres mostrados na tela devidos a INPUT nao sao afetados, assim como todos os caracteres 
anteriores ao FLASH. 

0 FLASH opera alterando um pouco o codigo ASCII padrao. Por isso, todos os caracteres 
mandados para o disco em modo flash serao transferidos com codigos incorretos. Ao serem lidos 
de volta, aparecerao caracteres errados. 

Nao dispom'vel em Integer BASIC. 


FN 

Mostrado na parte de funpoes neste capi'tulo. Veja tambem DEF FN. 


FOR 

Inicia um loop que repete uma serie de instrupoes ate que uma variavel de incremento automatico 
atinja um determinado valor. 


Formato: 


FOR varnm=exprnm i TO exprnm 2 [STEP exprnm $ ] 

Quando o FOR e executado pela primeira vez, e dado o valor exprnm x a variavel varnm. As decla- 
rapoes seguintes ao, FOR sao executadas ate que uma declarapao NEXT apareca. O valor de varnm 
e entao incrementado de exprnm^ (ou 1 se STEP nao esta presente). Em seguida, o novo valor de 
varnm e comparado com o valor de exprnm 3 . Se o sinal e positivo e o novo valor de varnm e me- 
nor ou igual a exprnm 2 , a execucao volta para a declaracao seguinte ao FOR. A mesma coisa acon- 
tece se o sinal de exprnm 3 e negativo e o novo valor de varnm e maior ou igual a exprnm 2 . Por 
outro lado, a execupao continua com a declarapao seguinte ao NEXT se varnm e maior que 
exprnm 2 (exprnmZ positivo) ou menor ou igual a exprnm 2 (exprnm 3 negativo). Devido a com- 
parapao ocorrer depois de incrementar varnm, as instrupoes entre o FOR e o NEXT sao executadas 
em, pelo menos, uma vez. 

Em Integer BASIC, varnm deve ser uma variavel inteira. Em Applesoft, varnm deve ser uma 
variavel real. Ela nunca pode ser do tipo cordao. 

Os valores de ini'cio, fim e incremento sao determinados por exprnmi , exprnm 2 e exprnm^ 
apenas uma vez, na primeira execupao da declarapao FOR. Se esses valores sao trocados dentro do 
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loop, eles nao afetarao o loop. Pode-se trocar o valor de vamm dentro do loop. Isso pode fazer 
com que se termine o FOR-NEXT antes que o valor final seja encontrado: coloque em varnm o 
valor final (de exprnm 2 ), e no caso seguinte do loop ele sera terminado. Nao inicie um loop 
dentro de uma sub-rotina finalizando em outra. 

Os loops FOR-NEXT podem ser aninhados. Cada um dos loops no caso devem ter um 
varnm diferente. Cada loop aninhado deve estar totalmente contido no outro mais externo, os 
loops nao podem terminar no mesmo ponto. 0 Integer BASIC permite 16 nfveis de loop para o 
FOR-NEXT, o Applesoft permite apenas 10. 

O FOR pode ser usado em modo imediato apenas em Applesoft. 0 loop inteiro deve ser 
entrado na mesma linha. Se o NEXT nao estiver presente, o loop so sera executado uma vez. 


FP 

Coloca o Apple II em Applesoft. 


Formato: 


FP[,Dr?][,Sr?][, V/?] 

A fonte do Applesoft depende de que tipo de Apple II se tern, e de que opcionais estao insta- 
lados: 

1. Com Apple II Plus a linguagem esta em ROM (memoria so de leitura), nao importa que 
tipos de opcionais existem. 

2. Se tiver o cartao Applesoft firmware instalado, o FP obtem a linguagem a partir dele, 
nao importando as chaves do cartao. 

3. Com o Apple II Language System instalado, o FP pega o Applesoft dele. 

4. Em qualquer outro Apple II, o FP procura o Applesoft no disco especificado (ou cor- 
rente). Se ele nao existe 12, a mensagem LANGUAGE NOT AVAILABLE aparece. 

0 FP zera qualquer programa BASIC presente na memoria. 

Se o arquivo nao existe no drive Dr? do slot Sr?, a mensagem de erro FILE NOT FOUND 
aparece. Se o disco do drive Dr?, slot Sr? nao tern volume Vr?, aparece o erro VOLUME MISMATCH. 

Dr?, Sr? e Vr? podem aparecer em qualquer ordem. Se Dr7 e Sr? sao omitidos, o drive referen- 
ciado por ultimo e adotado. VO e usado por ausencia de Vr?. Tambem r? pode estar ausente, e DO, 
SO e VO sao usados. 

Uso apenas em modo imediato. 


GET 


Esta declaracao do Applesoft aceita um caractere unico do teclado sem mostrar na tela. 
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Formato: 


GET var 

A execugao para ate que uma tecla seja acionada. Quando var e uma variavel cordao, o caractere 
e associado a variavel. Se Ctrl-@ e entrado, fica atribui'do o cordao nulo a variavel. 

0 GET nao tem uso frequente com valores numericos para variaveis. Quando e usado, per- 
mite a entrada de um di'gito de 0 a 9, associando o valor a variavel. Entrando-se o sinal mais, me- 
nos, vfrgula, dois pontos, Ctrl-E, espago, E, ou ponto, o valor da variavel fica sendo zero. Entran- 
do qualquer caractere diferente desses acima, resulta a mensagem de erro 7SYNTAX ERROR, 
e o programa para. 

O GET nao pode ser usado em modo imediato. 

Nao dispom'vel em Integer BASIC. 


GOSUB 

Faz o programa pular para a linha indicada. Quando e executada uma instrugao RETURN, o pro¬ 
grama pula de volta para a instrugao imediatamente seguinte ao GOSUB. 


Formato Geral: 

GOSUB tin 

A declaragao GOSUB chama uma sub-rotina. 0 ponto de entrada da sub-rotina deve ser na linha 
numero tin. Esse ponto de entrada deve ser o im'cio logico de uma sub-rotina. Ou seja, uma linha 
que contenha uma declaragao que e executada primeiro. 0 ponto de entrada da sub-rotina nao 
precisa necessariamente ser o seu menor numero de linha. 

Apos a completa execugao da sub-rotina, o programa volta a linha seguinte ao GOSUB. A 
sub-rotina usa uma declaragao RETURN para informar que o programa deve voltar. 

Um GOSUB pode ocorrer em qualquer ponto do programa; portanto, uma sub-rotina pode 
ser chamada de qualquer ponto do programa. 

Sub-rotinas podem ser aninhadas; isto e, podem ser chamadas de dentro de outras sub- 
rotinas. Sao permitidos vinte e cinco rn'veis de aninhamento no Applesoft, ou seja, podem ser exe- 
cutadas vinte e quatro declaragoes GOSUB antes da primeira declaragao RETURN. 0 limite em 
Integer BASIC sao 16 m'veis. 

Normalmente deve-se sair de uma sub-rotina com uma declaragao RETURN, e nao GOTO. 
Porem pode-se usar GOTO para sair da sub-rotina se antes for executada uma declaragao POP. 

Nao pode ser usada em modo imediato no Integer BASIC. 


Formato Adicional no Integer BASIC: 

GOSUB exprnm 

Em Integer BASIC, uma expressao numerica pode ser colocada no lugar do numero de linha. Se o 
calculo de exprnm nao resultar num numero de linha existente, aparece a mensagem de erro 
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*** BAD BRANCH ERR. Este formato do GOSUB permite simular a instrucao ON GOSUB, que 
nao e dispomvel em Integer BASIC. 


GOTO 

Salto incondicional do programa para a linha indicada. 


Formato Geral: 

GOTO tin 

A execucao do programa continua a partir da linha indicada. Se ela nao existe, aparece a men- 
sagem ?UNDEF'D STATEMENT ERROR no Applesoft, e a mensagem *** BAD BRANCH ERR 
no Integer BASIC. 


Formato Adicional no Integer BASIC: 

GOTO exprnm 

Em Integer BASIC, e permitido colocar uma expressao numerica no lugar do numero de linhas. Se 
o numero de linhas calculado nao existir, a mensagem *** BAD BRANCH ERR aparece. Essa 
forma do GOTO permite simular a declarapao ON GOTO, nao dispomvel em Integer BASIC. 


GR 

Converte a tela para grafico de baixa resolucao (40 X 40), deixando quatro linhas para texto na 
parte baixa da tela. 


Formato: 


GR 

A porpao grafica da tela e colocada em preto, o cursor e posicionado na janela de texto, e COLOR 
e posto em 0 (preto). 

Se executado enquanto HGR esta em atividade, o GR se comporta normalmente. Entre- 
tanto, se HGR2 estiver em processo, o sistema dara acesso a pagina 2 de texto e graficos em baixa 
resolucao. Isso pode ser confuso, porque a tela ficara cheia de bobagem e nada que for digitado 
aparecera na tela. Para voltar ao modo normal, digite TEXT. Use sempre TEXT nos programas, ao 
passar de HGR2 para GR. 

Pode-se pular para a forma de tela cheia (40 X 48), em grafico de baixa resolupao, com a 
declarapao POKE —16302,0 apos executar GR. Qualquer coisa digitada apos isso no modo ime- 
diato sera colocada na tela como pontos coloridos nas quatro ultimas linhas da tela, porem a 
execucao sera normal. POKE -16302,0, devolve a janela de texto. 
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HCOLOR= 

Esta declaracao do Applesoft fornece a cor para desenho em modo grafico em alta resolucao. 


Formato: 


H CO LO R = exprnm 

Ate a declaracao HCOLOR seguinte, todas as declaragoes HPLOT e DRAW serao executadas na 
cor especificada. Os codigos de cores sao listados na Tabela 8.3. 0 valor de exprnm deve estar na 
faixa entre 0 e 7. Valores fora dessa faixa produzem uma mensagem ?ILLEGAL QUANTITY 
ERROR. Um desenho executado antes da primeira determinacao HCOLOR sera feito numa cor 
indefinida. 

0 HCOLOR nao afeta graficos em baixa resolucao. Uma declaracao HCOLOR executada 
quando o Apple II nao esta em modo grafico de alta resolucao nao afeta a cor do desenho seguinte 
em alta resolugao. 

Nao dispom'vel em Integer BASIC. 


HGR 

Esta declaragao do Applesoft converte a tela em modo grafico de alta resolugao (260 X 160), com 
uma janela de texto de quatro linhas na parte de baixo da tela. 

Formato: 

HGR 

E mostrada a pagina 1 de alta resolucao. A memoria da tela de baixa resolugao (texto) nao e afe- 
tada, porem apenas as quatro ultimas linhas ficam visfveis. 0 cursor nao se move para essa janela. 
Nao se pode ver o cursor ate que se tenha digitado varias linhas apos executar o HGR. A porgao 
grafica da tela e colocada em preto. HCOLOR nao e afetado com este comando. 


TABELA 8.3. Codigos de Cores em Alta Resolugao. 


Codigo 

Cor 

Codigo 

Cor 

0 

Preto 

4 

Preto 

1 

Verde 

5 

Laranja* 

2 

Violeta* 

6 

Azul* 

3 

Branco 

7 

Branco 

* Depende dos controles da TV. 
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Pode-se ter toda a tela (280 X 192) em forma de alta resolupao com a declarapao POKE 
16302,0, apos executar HGR. Qualquer comando dado no modo imediato depois disso nao sera 
visto na tela, porem sera executado de acordo. POKE —16301,0 devolve a janela de texto. 

Em sistemas do Apple II com menos de 32K bytes de memoria, nao se pode usar HGR e o 
DOS ao mesmo tempo desde que eles ocuparao necessariamente a mesma cirea de memoria. 

Alem disso, o interpretador Applesoft em disco ou cassette ocupa parte da pagina grafica 1 
de alta resolupao. Por isso nao se pode usar HGR com Applesoft em disco ou cassette. 

Mesmo com Applesoft em firmware, se o programa e muito longo, ele pode entrar na area de 
pagina grafica de alta resolupao 1. Pode-se precaver sobre isso com o comando HI MEM: 8192 
que mantem o programa fora da area grafica 1. 

Nao dispomvel em Integer BASIC. 


HGR2 

Converte a tela inteira para modo grafico de alta resolupao (280 X 192). E mostrada a pagina 2 
de grafico em alta resolupao. 

Formato: 


HGR2 

A memoria de tela em baixa resolupao (texto) nao e afetada. Entretanto nao se consegue ver o 
que e digitado, apesar de ser executado normalmente. A tela colocada em preto. O HCOLOR 
nao e afetado por este comando. 

A pagina grafica 2 nao e disponfvel se o sistema tern menos de 24K de memoria. Em sis¬ 
temas com 24K, coloque HIMEM: em 16384 antes de usar HGR2 para proteger o programa e as 
variaveis dos graficos, e vice-versa. 

Nao se pode usar HGR2 e o DOS de forma simultanea a menos que o sistema tenha 36K 
de memoria ou mais. Isso quer dizer que sao necessarios pelo menos 36K para ter o HGR2 junto 
com o Applesoft em disco. 

Nao tente gerar uma janela de texto com POKE —16301,0. Isso vai mostrar a pagina gra¬ 
fica 2 de baixa resolupao enquanto os comandos digitados vao para a pagina 1 tornando-se invisf- 
veis (embora sejam executados corretamente). 

Nao disponfvel em Integer BASIC. 


HIMEM: 

Gera olimite superior de memoria dispomvel para programa em BASIC, incluindoarea de variaveis. 

Formato: 

HIMEM: exprnm 

HIMEM: determina a posipao mais alta de memoria de leitura e gravacao (RAM) disponfvel para o 
programa BASIC. 0 sistema operacional em disco (DOS) sempre reside acima do HIMEM: seesta 
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presente. Com a declaragao HIMEM: pode-se reservar espago para sub-rotinas em linguagem de 
maquina e tabelas de forma grifica de alta resolugao. Tambem se pode proteger a area de RAM 
reservada para tela grafica de alta resolugao. 

HIMEM: primeiramente e preenchido com a posigao de memoria mais alta do Apple II (por 
exemplo, 49151 em sistemas de 48K). 0 DOS reside na parte mais alta da memoria, de forma que 
ele ajusta o HIMEM: aproximadamente 10.800 bytes abaixo quando e carregado. Cada arquivo 
de buffer adicional que e carregado via MAXFILES abaixa o HIMEM: outros 595 bytes. Se o pro- 
grama em Applesoft usa cordoes, seus valores sao guardados iniciando na posigao resultante de 
HIMEM:, trabalhando de cima para baixo. Consulte o mapa de memoria no Apendice G. 

0 valor de exprnm deve estar na faixa entre —65535 ate 65535 (—32767 ate 32767 em 
Integer BASIC) ou ocorre uma mensagem de erro. 

Nao se deve colocar o HIMEM: indicando posigao acima da maior posigao de memoria dis- 
pom'vel, porque nesse caso se corre o risco de ter armazenamento de variaveis em posigoes de 
memoria nao existente. 

Pode-se ver o valor corrente de HIMEM: usando as instrugoes apropriadas, como listado 
abaixo: 


PRINT PEEK(116) * 256 + PEEK(115) para Applesoft 
PRINT PEEK(77) * 256 X PEEK(76) para Integer BASIC 

HIMEM: nao e afetado por NEW, RUN ou CLEAR. 

Se for dado HIMEM: menor que LOMEM: ou nao se deixar espago suficiente para o progra- 
ma, ocorre uma mensagem de erro. 

So pode ser usado em modo imediato no Integer BASIC. 


HLIN 

Desenha uma linha horizontal na tela dentro do modo grafico em baixa resolugao. 


Formato: 


HLIN col u col 2 AT lin 

A linha e desenhada de col x ate col 2 na linha especificada. A cor e determinada pela ultima decla¬ 
ragao COLOR executada. Se a tela estiver em modo texto, ou se a janela de texto estiver presente, 
e lin for maior que 39, HLIN desenhara uma linha de caracteres na tela, no lugar referente a janela 
de texto, onde os pontos graficos deveriam ser colocados. Os caracteres usados sao determinados 
pela ultima declaragao COLOR executada; veja a Tabela 8.5 (perto da declaragao PLOT neste 
capftulo) para detalhes. 

Em Integer BASIC, col { deve ser menor ou igual a col 2 ou a mensagem *** RANGE ERR 
aparecera. 
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HOME 

Esta declaragao do Applesoft limpa a tela e posiciona o cursor no canto superior esquerdo da 
janela de texto. 


Formato: 


HOME 

Em Integer BASIC, use CALL-936. 


HPLOT 

Esta declaracao do Applesoft coloca um ponto ou desenha uma linha colorida na tela grafica de 
alta resolugao. 


Formato: 


HPLOT colh, linh 
HPLO TO colh, linh 

HPLOT colh u linh x TO colh 2/ linh 2 [TO colh 3f linh 3 . . . ] 

A primeira forma do comando coloca um ponto colorido na tela e na posicao especificada. A cor 
do ponto e determinada pela ultima declarapao COLOR executada. 

A segunda forma do comando desenha uma linha colorida a partir do ultimo ponto colo- 
cado ate as coordenadas colh e linh. Se nao houve ainda nenhum desenho desde que foi dado o 
comando HGR ou HGR2, nada sera desenhado. A cor da linha e dada pela ultima declarapao 
HCOLOR executada. 

A terceira forma do comando tambem desenha uma linha colorida. Com o Applesoft em 
firmware, a linha pode ter mais de um segmento. Primeiro e desenhado o segmento de colhi e 
linh i ate col 2 e linh 3 . A cor da linha (todos os segmentos) e dada pela ultima declaragao COLOR 
executada. 

Nao sao permitidas coordenadas adicionais em Applesoft em disco ou cassette. Quando 
presente em um programa Applesoft em firmware, o segundo segmento e desenhado a partir de 
col 2 e linh 2 ate co/h 3 e Hnh 3 etc. Pode haver qualquer numero de pares de coordenadas desde 
que eles caibam em uma linha de programa. 

Qualquer porgao de uma linha ou pontos que cai'rem na janela de texto nao serao visi'veis. 
Entretanto, se for mudado para formato de grafico total como o comando POKE —16302,0, 
qualquer linha ou ponto desenhado na janela de texto se tornara visfvel. 

Deve-se sempre executar uma declaragao HGR ou HGR2 antes de um HPLOT. De outra 
forma, pode-se destruir programas ou variaveis. 

Nao dispomve! em Integer BASIC. 
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HTAB 


Esta declaragao em Applesoft posiciona o cursor numa coluna especificada na linha corrente. 


Formato: 


HTAB col 


O cursor se move para a direita ou esquerda para a coluna especificada pelo valor de col, sem 
limpar qualquer caractere na tela. As colunas sao numeradas de 1 a 40 (esquerda para a direita). 
Em Integer BASIC, usa a declaragao TAB. 


IF-THEN 


Execugao condicional de instrugao ou instrugoes pelo programa. As regras para Integer BASIC 
e Applesoft sao vistas em separado. 

Formato em Integer BASIC: 


IF expressao THEN declaracao 
IF expressao THEN [GOTO ] linha 


Na primeira forma da declaragao IF-THEN, a expressao especifica uma condigao que, se verda- 
deira, causa a execugao da declaragao seguinte ao THEN. Se a condigao e falsa, e executada a 
declaragao em seguida ao IF-THEN; a declaracao seguinte ao THEN nao e executada neste caso. 

No segundo formato do IF-THEN (formato de salto condicional), a expressao especifica 
uma condigao que, sendo verdadeira, causa o salto do programa para o numero de linha indicado. 

As expressoes relacionais sao as mais frequentemente usadas em IF-THEN. Valores tipo 
cordao so podem ser comparados como iguais ou diferentes em Integer BASIC. 

expr tambem pode ser uma expressao numerica. Nesse caso, expr e considerada verdadeira 
se for um valor diferente de zero. 

A expressao IF-THEN nao pode ser uma expressao cordao (ou seja, qualquer coisa que 
calcule uma variavel cordao) em Integer BASIC. 

Formato do Applesoft: 


IF expr THEN declaracao [: declaracao . . . ] 
/ THEN 
IF expr < GOTO 

* THEN GOTO 



No primeiro formato da declaragao IF-THEN, a expressao especifica uma condigao que, se verda¬ 
deira, causa toda a declaracao que segue THEN na mesma linha de programa a ser executada. Se 
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a condigao e falsa, o controle passa para a primeira dedaragao da I inha de programa que segue 
e nenhuma declaragao depois do THEN e executada. 

No segundo formato (formato de salto condicional), o programa pula para a linha numero 
linha se a condigao e verdadeira. De outra forma a execugao continua com a primeira declaragao 
da primeira linha de programa que segue o IF-THEN. 

Se um salto incondicional for urna das varias declaragoes que seguem o THEN, entao ele 
deve ser a ultima declaragao da linha, e deve ter o formato GOTO linha. Se um salto incondicional 
nao for a ultima declaragao da linha, as declaragoes que o seguem nunca serao executadas. 

O tipo mais comum de expressao usado em IF-THEN e o relacional. Se expressoes tipo 
cordao sao comparadas usando operadores relacionais, os codigos ASCII (listados no Apendice I) 
dos caracteres envolvidos determinam os valores relativos dos cordoes. Sao comparados caractere 
por caractere ate que uma diferenga ocorra. Entao o cordao com codigo ASCII maior naquela 
posigao sera considerado maior. Se nao ocorrer diferenga, o cordao mais longo sera o maior. 

A expressao tambem pode ser numerica. Se o valor da expressao nao e zero, a condigao e 
considerada verdadeira. Se o valor da expressao e zero (falso), a execugao continua a partir da 
primeira linha de programa a seguir. 

Em Applesoft, expr tambem pode ser uma expressao tipo cordao. Entretanto, a execugao 
de duas ou tres declaragoes no decorrer de um programa gera a mensagem 7FORMULA TOO 
COMPLEX ERROR. 

O Applesoft tern problemas se o ultimo caractere nao-espago que precede o THEN e a 
letra A. 0 A combinado com o T forma a palavra reservada AT. Para evitar esse problema pode-se 
fechar com parenteses toda a expressao, incluindo o A. 

Se um loop FOR-NEXT vier em seguida ao THEN, ele deve estar inteiramente contido 
dentro da linha IF-THEN. Outros IF-THEN podem vir a seguir ao THEN, desde que estejam 
completamente contidos dentro da linha IF-THEN original. Entretanto, uma expressao Booleana 
ganha de IF-THEN aninhados no aspecto de clareza. Por exemplo, as duas declaragoes abaixo sao 
equivalentes, mas a segunda e mais facil de ser entendida. 

10 IF A$ = "X" THEN IF B = 2 THEN IF C>D THEN 50 
10 IF A$ = "X" AND B = 2 AND C>D THEN 50 


IN# 

Selecione o slot periferico de onde as entradas subsequentes serao aceitas. 


Formato: 


IN# slot 

Todas as declaragoes que seguirem procuragao dados no periferico do slot determinado. slot 
deve ser um valor inteiro entre 0 e 7. Note que slot 0 nao e um dispositivo periferico; IN#0 
especifica o teclado como dispositivo de entrada. Se nao existir periferico acoplado ao slot especi- 
ficado, o sistema ficara bloqueado ate o acionamento de RESET. 

Sempre que o DOS estiver presente na memoria do Apple II, IN# sera considerado um 
comando do DOS, requerendo PRINT e Ctrl-D em modo programado. 
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INIT 

Inicializa um disco. 


Formato: 


INIT nomearq [, Da?] [, S/7] [, V/ 7 ] 

0 programa presente na memoria e guardado no disco sob o nome de arquivo dado. Esse pro- 
grama se torna o programa de saudagao, e roda automaticamente sempre que o disco e carregado. 
Ao disco e associado o numero de volume com que ele e inicializado; se nao e informado nenhum 
numero de volume, associa-se ao disco o numero de volume 254. 

Se o arquivo nao existe no drive D/7 do slot S/?, aparece a mensagem de erro FILE NOT 
FOUND. 

D/7, S/7 e V/7 podem ser dados em qualquer ordem. Se D/7 e S/7 sao omitidos, o drive aces- 
sado por ultimo e usado. Tambem n pode ser ausente; DO ou SO sao usados. 

O INIT so pode ser usado em modo imediato. 

INPUT 

Aceita caracteres entrados a partir do teclado ou outro dispositivo de entrada, calcula e associa o 
valor ou valores com a variavel ou variaveis. 


Formato em Integer BASIC: 

INPUT [ "requisigao ", ] var [, var . . . ] 

0 INPUT no Integer BASIC aceita valores em qualquer combinagao entre variaveis inteiras e 
cordoes. Se a primeira variavel e um inteiro, entao aparece um ponto de interrogagao na posigao 
atual do cursor como uma indicagao para entrada. 0 Integer BASIC nao coloca interrogagao se 
a primeira variavel a ser entrada e um cordao. 

A requisigao opcional e uma constante tipo cordao. Se presente, e mostrada antes da pri¬ 
meira variavel a ser entrada; ela nao se repete a cada variavel da lista. Aparece um ponto de inter¬ 
rogagao a frente da requisigao se a primeira variavel da lista e um inteiro. So e mostrada a requi¬ 
sigao se a primeira variavel a entrar e um cordao. Veja que a requisigao e seguida de vfrgula na 
declaragao INPUT. A requisigao nao pode ser uma variavel cordao ou uma expressao tipo cordao. 

Quando uma unica declaragao INPUT chama mais de uma variavel de forma sucessiva, pode- 
se entrar cada uma delas numa linha separada; separando cada valor com a tecla RETURN. O 
Integer BASIC mostra um ponto de interrogagao (?) a cada linha, pedindo outra entrada. Opcio- 
nalmente, pode-se entrar mais de um valor inteiro na mesma linha; separando os valores com 
vfrgula. 

Entradas numericas devem conter apenas caracteres validos como numericos. Os dfgitos de 
0 a 9, espago e sinais de mais e menos. Obtem-se uma mensagem de erro ao se acionar RETURN 
sem entrada de nenhum valor numerico. 

Deve-se digitar cada variavel tipo cordao numa linha separada. Todos os caracteres (exceto 
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Ctrl-C, Ctrl-M, Ctrl-H, Ctrl-U e Ctrl-X) digitados antes de se acionar RETURN sao aceitos 
e associados a variavel cordao. 0 cordao nulo ( " " ) e associado a variavel no caso de acionamento 
simples da tecla RETURN quando uma variavel cordao e esperada. Se forem digitados caracteres 
inaceitaveis (ou seja, letras em valores numericos) a mensagem de advertencia *** SYNTAX ERR 
e RETYPE LINE aparece. Deve-se reentrar todos os valores digitados na linha nao aceita. 

Nao pode ser usado em modo imediato. 


Formato no Applesoft: 

INPUT [requisigao ;] var [, var.. . ] 

0 INPUT pode requisitar qualquer combinapao de valores numericos e cordoes. Um ponto de 
interrogapao e normalmente mostrado como indicapao de infcio de digitapao, no ponto onde esta 
o cursor. O Applesoft suspende a interrogapao se a requisigao opcional estiver presente. 

A requisigao 6 uma constante tipo cordao. Se presente, ela e mostrada antes da variavel ser 
digitada, nao sendo repetida para as digitapoes das variaveis da lista. Nao e colocado o ponto de 
interrogapao apos a requisigao. Note como a requisigao e seguida de ponto-e-vi'rgula na decla¬ 
rapao INPUT. 

De forma geral, quando uma declarapao INPUT simples chama mais de um valor, pode-se 
entrar cada um em uma linha separada; terminando cada digitapao com a tecla RETURN. 0 Apple¬ 
soft mostra interrogapao dupla (??) para cada valor requerido. Opcionalmente, pode-se entrar 
mais de um valor numa unica linha; separando-os com vfrgula. 

Se forem digitados caracteres inaceitaveis (exemplo: letras em valores numericos) aparece 
uma mensagem de advertencia e deve-se redigitar toda a linha. 0 Applesoft manda a mensagem 
REENTER e reexecuta a declarapao INPUT a partir de seu infcio. A interrogapao ou a requisipao 
e impressa e deve-se redigitar todos os valores do INPUT. 

Entradas numericas devem consistir apenas de caracteres numericos. Se apenas for acionada 
a tecla RETURN, quando e esperado um valor numerico, aparece a mensagem de erro e a linha 
deve ser redigitada. Os dfgitos de 0 a 9, espaco e os sinais de mais e menos sao aceitos como valores 
numericos. 0 Applesoft tambem aceita o ponto decimal, um sinal adicional de mais ou menos e a 
letra E para a entrada de numeros reais em notapao cientffica. 

Em Applesoft, se o primeiro caractere diferente de espapo numa entrada de cordao e aspas, 
todos os caracteres (incluindo vfrgulas e dois pontos) ate as proximas aspas ou RETURN sao 
atribufdos a variavel. Se a entrada nao inicia com aspas, todos os caracteres (incluindo aspas) ate 
a proxima vfrgula, dois pontos ou RETURN sao atribufdos a variavel. Se dois ou mais cordoes sao 
requisitados pela declarapao INPUT, eles devem ser separados por vfrgulas. 

Se for acionada apenas a tecla RETURN quando e esperado um cordao, o cordao nulo ( " ") 
e associado a variavel. 

Em Applesoft, todos os caracteres apos dois pontos em INPUT sao ignorados a menos que 
a digitapao inicie com aspas. 

INPUT nao pode ser usado em modo imediato. 


INT 


Coloca o Apple II em Integer BASIC. 
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Formato: 


I NT 

Qualquer programa presente na memoria e zerado. Se o Integer BASIC nao esta presente (por 
exemplo, num Apple II Plus sem o Language Card), a mensagem LANGUAGE NOT AVAILABLE 
aparece. 

Usado apenas em modo imediato. 


INVERSE 

Esta declarapao do Applesoft liga o modo vfdeo inverso (tambem chamado vi'deo reverso). 


Formato: 


INVERSE 

Todas as safdas subseqiientes, dadas com declaragao PRINT aparecerao em caracteres preto-no- 
branco. As mensagens de erro tambem sao afetadas. Entretanto, os caracteres mostrados na tela 
devido a declaragoes INPUT nao sao afetados, bem como os caracteres mostrados anteriormente. 

0 INVERSE opera alterando urn pouco o codigo ASCII. Assim, qualquer caractere man- 
dado para o disco em vfdeo reverso sera guardado em codigos incorretos. Ao serem lidos de volta, 
aparecerao caracteres errados. 

Nao disponfvel em Integer BASIC. 


LET = 


Uma declarapao de atribuipao, LET=, ou simplesmente =, atribui um valor a uma determinada 
variavel. 


Formato: 


[LET] var = expr 

A variavel var passa a conter o valor obtido pelo calculo de expr. 


LIST 

Mostra todo ou uma parte do programa corrente na memoria. Existem dois formatos para o 
comando LIST. Um e reconhecido por Integer BASIC e Applesoft e o outro apenas pelo Apple¬ 
soft. Eles sao descritos em separado abaixo. 
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Formato Geral: 

LIST///?! [,/in 2 ] 

Qualquer parte do programa pode ser listada. Se nao for colocada nenhuma linha a seguir do LIST, 
todo o programa e listado. Se apenas !in x esta presente, apenas aquela linha e listada, se existir. 
Se ambas as linhas estiverem presentes, o programa sera listado a partir da///?! e continuara ate a 
// 7? 2 . 

Se a /ini nao existir, a listagem iniciara na proxima linha de numero mais alto. S e lin 2 nao 
existir, a listagem termina na ultima linha de numero mais baixo. 

LIST nao pode ser usado com variaveis ou expressoes no lugar de numeros de linhas. 

Quando o LIST mostra o programa, ele deixa espaco extra para variaveis e palavras reserva- 
das para tornar a listagem mais legfvel. Se isso causar problemas, pode-se eliminar esse efeito 
reduzindo a janela de texto para o tamanho 33 (ou menos) com o comando POKE 33,33. (POKE 
33,40 ou TEXT devolve o tamanho normal para a janela de texto.) 

0 comprimento das linhas de programa e limitado, porem e calculado antes que o LIST 
forneca espacos extra. Dessa forma pode-se estender o comprimento aparente das linhas de pro¬ 
grama deixando espacos ao se digitar as linhas. A desvantagem e que a linha ser2 muito longa 
para copiar e editar apos ser listada com muitos espagos incorporados. 


Formato (expandido) do Applesoft: 

/ lin x Ut)] 

LIST ! 

* /ini ] { 7 } Hn 2 

Em Applesoft, tanto a vfrgula ( , ), quanto o hffen ( - ) podem separar dois numeros de linha. 

Em Applesoft tambem se pode listar a partir do infcio do programa ate uma determinada 
linha colocando uma vfrgula ou hffen a frente da lin 2 (omitindo //7?i). Tambem se pode listar a 
partir de um numero de linha especffico ate o fim do programa colocando a vfrgula ou hffen 
apos///?! (e omitindo lin 2 ). 


LOAD 

Carrega um, e de cassette ou disco. 


Formato em Cassette: 

LOAD 

Carrega o programa sequencial seguinte a partir do cassette, colocando no lugar do programa 
corrente na memoria. Deve-se ter o gravador cassette rodando no modo PLAY quando o LOAD 
e executado; o Apple II nao da nenhuma informaqao sobre isso. Ele da um bip quando inicia o 
carregamento e outro quando termina. 0 segundo bip informa que se deve desligar o gravador. 
So pode ser usado em modo imediato no Integer BASIC. 
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Formato em Disco: 

LOAD nomearq [, D/7] [ # S/7] [, V/7] 

0 programa de nome nomearq e carregado a partir do disco. Se a operagao for bem-sucedida, o 
programa anterior da memoria e apagado. 

Se o programa a ser carregado for em Applesoft e o Apple II estiver em Integer BASIC, ou 
vice-versa, ele troca as chaves para a linguagem apropriada. Isso pode requerer o carregamento da 
linguagem a partir de um disco especi'fico. Se a linguagem nao estiver dispomvel, a mensagem 
LANGUAGE NOT AVAILABLER aparece. 

Se o arquivo nao existir no drive Dr7 do slot Sr?, a mensagem FILE NOT FOUND aparece. 
Se o disco no drive Dr? e slot Sr? nao tiver o volume Vr?, o erro VOLUME MISMATCH e apresen- 
tado. 

Dr?, Sr? e Vr? podem ser especificados em qualquer ordem. Se Dr7 e Sr? sao omitidos, o ultimo 
drive ou slot referenciado e usado. VO e adotado quando Vr? estiver ausente. Tambem n pode 
estar ausente, sendo adotado DO, SO e VO. 

Este e um comando DOS, requerendo PRINT e CTRL-D em modo programado. 


LOCK 

Protege um arquivo em disco de eliminagao acidental. 

Formato: 


LOCK nomearq [, Dr?] [, Sr?] [, Vr?] 

Uma vez protegido, um arquivo nao pode ser eliminado ou ter seu nome trocado ate que seja 
desprotegido (veja UNLOCK). Nenhum programa pode ser guardado com o nome igual ao de um 
programa protegido. Um arquivo protegido e indicado no catalogo do disco por um asterisco a 
esquerda do tipo do arquivo. 

Dr7, Sr? e Vr? podem ser especificados em qualquer ordem. Se Dr? e Sr? sao omitidos, o ultimo 
drive ou slot referenciado e usado. VO e adotado quando Vr? estiver ausente. Tambem n pode 
estar ausente, sendo adotado, DO, SO e VO. 

Este e um comando DOS, requerendo PRINT e CTRL-D em modo programado. 


LOMEM: 

Determina o limite inferior de memoria dispomvel para variaveis de programas BASIC. 

Formato: 

LOMEM: exprnm 

LOMEM: estabelece a menor posigao de memoria RAM dispomvel para as linhas de programa 
e variaveis no BASIC. 0 Monitor e o interpretador BASIC usam memoria abaixo de LOMEM: 
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para apontadores, gr^ficos em baixa resolupao e memoria de texto da tela etc. Quando o interpre- 
tador Applesoft e carregado do disco ou cassette, ele sempre reside em RAM abaixo de LOMEM:. 
Pode-se adicionar ainda espapo para sub-rotinas em linguagem de maquina e tabelas de formas 
graficas de alta resolupao com a declarapao LOMEM:. 

Com Integer BASIC em Applesoft em firmware, LOMEM: e posicionado em 2048, imediata- 
mente acima da area usada pelo sistema. Carregando o interpretador Applesoft do disco ou cas¬ 
sette faz-se o LOMEM: subir para 12291. A cada vez que se adiciona uma linha de programa ou se 
modifica uma linha existente, o LOMEM: e ajustado para cima ou para baixo. Limpando-se um 
programa em Applesoft (com NEW ou Ctrl-B) tambem se altera LOMEM:. Assim, se se deseja 
reservar espaco abaixo do programa, deve-se fazer isso apos limpar qualquer programa anterior 
e antes de carregar ou digitar o novo. 

0 valor deexprnm deve estarentre —65535 e 65535 (—32767 ate 32767 em Integer BASIC), 
ou um erro ocorrera. 

Pode-se ver o valor corrente de LOMEM: com a instrupao PRINT PEEK(106) * 256 + 
+ PEEK(105). 

Em Applesoft, se LOMEM: e colocado com um valor maior que HIMEM: menor que o valor 
ja existente de LOMEM:, ou menor que a posipao mais alta de memoria usada para o sistema 
operacional corrente ou programa, a mensagem ?OUT OF MEMORY ERROR. 

So pode ser usado em modo imediato em Integer BASIC. 


MAN 

Termina numerapao automatica de linhas em Integer BASIC. 

Formato: 

MAN 

A numerapao automatica de linhas inicia com AUTO. 

Digite Ctrl-X para parar temporariamente a gerapao de numeros de linhas, digitando entao 

MAN. 

Nao dispomvel em Applesoft. 


MAXFILES 

Especifica o numero maximo de arquivos em disco que podem ser ativados a qualquer tempo. 


Formato: 


MAXFILES Iimite 

0 sistema operacional (DOS) suporta um maximo de 16 arquivos abertos ao mesmo tempo. 
Quando executado, o MAXFILES reserva 595 bytes de memoria (um buffer de arquivo) para cada 
arquivo. MAXFILES e colocado em 3 automaticamente ao se carregar o DOS. 
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Todos os comandos do DOS exceto o MAXFILES usam o buffer de arquivo quando sao exe- 
cutados. Assim, o numero maximo de arquivos que se pode ter aberto na pratica e um a menos do 
limite de MAXFI LES. Ao se tentar executar comandos DOS quando nao ha buffers dispomveis, a 
mensagem NO BUFFER AVAILABLE 6 gerada. 

MAXFI LES opera com o HI MEM: quando executado, o que pode limpar parte de progra- 
mas, armazenamento de variaveis etc. Se possfvel, execute MAXFI LES antes de carregar e executar 
programas. 

Usando MAXFI LES dentro de um programa Applesoft, use*o na primeira linha. Para usar 
MAXFI LES em um programa Integer BASIC, deve-se criar um arquivo EXEC como visto no 
Capftulo 5 (veja tambem EXEC neste capftulo). 

limite deve ser uma constante na faixa de 1 a 16 ou um erro RANGE ERROR aparece. 

Este e um comando DOS, e requer PRINT e Ctrl-D em modo programado. 


MON 

Causa o aparecimento da tela dos comandos de disco e/ou fluxo de dados. 


Formato: 


MON [C][,l][,0] 

Os tres parametros dizem o que serci mostrado. Se e especificado C, todos os comandos do disco 
sao mostrados na tela. Se e especificado I, todos os dados que o Apple II recebe vindos do disco 
sao mostrados. Se 6 especificado 0, toda a saida de dados do Apple II para o disco e mostrada na 
tela. Estes parametros podem ser usados em qualquer ordem. Se nenhum deles estiver presente, o 
MON nao ter£ efeito. 0 efeitodo MON permanece ate queseja executada uma declarapao NOMON, 
FP ou I NT, ou o sistema seja recarregado, ou em algumas maquinas, seja dado o RESET. 

Este e um comando DOS, e requer PRINT e CTRL-D quando usado em modo programado. 


NEW 

Elimina o programa corrente e todas as variaveis a ele associadas da memoria. 


Formato: 


NEW 

0 NEW tambem reajusta o LOMEM:, porem HIMEM: COLOR e HCOLOR nao sao afetados. 
0 NEW so pode ser usado no modo imediato em Integer BASIC. 


NEXT 


Termina o loop iniciado com a instrupao FOR. 
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Formato Geral: 

NEXT varnm [, varnm ] 

Quando NEXT e executado, a variavel do loop varnm e incrementada do valor especificado na 
declaragao FOR correspondente. 0 programa entao, ou continua com a instrugao que segue o 
FOR ou volta ao FOR correspondente, dependendo do estado dos parametros da declaragao 
FOR. Veja o estudo da declaragao FOR anteriormente elaborado, neste capi'tulo. 

Se nao houver nenhum FOR em processo que use a variavel varnm, e acusado um erro. 
E mostrado ?NEXT WHITHOUT FOR ERROR no Applesoft, e *** BAD NEXT ERR no Integer 
BASIC. 

Variaveis multiplas seguintes ao NEXT devem ser listadas na ordem apropriada (o ultimo 
loop iniciado deve ser terminado primeiro) ou um erro acontecera. 

0 NEXT nao pode ser usado em modo imediato no Integer BASIC. Em Applesoft, um 
NEXT em modo imediato causa salto para a declaragao FOR que estava sendo executada no 
modo programado que estava ativo. 


Formato Applesoft Adicionai: 

NEXT 

Em Applesoft, pode-se usar NEXT sem identificagao do nome da variavel. A variavel adotada 
por ausencia e aquela do FOR que iniciou mais recentemente a ainda esta em efeito. NEXT sem 
vari£vel e executado mais rapidamente que o correspondente com variavel. 


NO DSP 

Cancela o modo display para a variavel especificada em Integer BASIC. (Veja DSP.) 


Formato: 


NO DSP var 

Nao disponfvel em Applesoft. 


NOMOM 

Finaliza a apresentagao de comandos de disco e fluxo de dados iniciada com MON. 


Formato: 


NOMOM [C][, I] [, 0] 

Cada parametro especificado cancela parte da apresentagao iniciada com MON. Se C e especifi¬ 
cado, os comandos do disco nao sao mostrados. Se I e especificado, os dados entrados do disco 
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para o Apple II nao sao mostrados. Se 0 e especificado, os dados safdos do Apple II para o disco 
nao sao mostrados. Esses parametros podem ser usados em qualquer combinacao e em qualquer 
ordem. Se MON nao estiver em efeito para o parametro ou parametros especificados, ou nenhum 
parametro for especificado, o NOMOM nao tera efeito. 

Este e urn comando DOS, e requer PRINT e CTRL-D quando em modo programado. 


NORMAL 

Esta declaragao do Applesoft desliga os modos de vi'deo FLASH e INVERSE. 


Formato: 


NORMAL 

Veja FLASH e INVERSE. 

Nao dispomvel em Integer BASIC. 


NO TRACE 

Cessa o acompanhamento da execucao do programa iniciado com TRACE. 


Formato: 


NO TRACE 

Se TRACE nao estiver em efeito, NO TRACE tambem nao tera efeito. 


ONNER GOTO 

Pula para a linha de numero indicado quando acontecer erro num programa Applesoft. 


Formato: 


ONNER GOTO linha 

Este comando liga um indicador que causa o salto do programa para a linha de numero indicado 
quando um erro e detectado. ONNER GOTO deve ser dado antes que um erro ocorra. 

Cada tipo de erro tern um codigo associado. 0 codigo do erro mais recente detectado fica 
guardado na posiqao de memoria 222. PEEK (222) pega o codigo de erro. Os codigos de erro e suas 
mensagens sao dados na Tabela C.1 (Apendice C). Quando um erro ocorre dentro de um loop 
FOR-NEXT ou numa sub-rotina, os apontadores e as pilhas sao alterados. A rotina de erro deve 
voltar para o ini'cio da declarapao FOR ou GOSUB, reiniciando o loop ou a sub-rotina. Se a rotina 
de erro voltar para o NEXT ou o RETURN, outro erro podera ocorrer. 
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ONNER GOTO nao funciona corretamente em algumas circunstancias. 0 Apple II trava se 
existem dois erros GET numa coluna e a rotina de manipulapao de erros termina com RESUME, 
e nao GOTO. Em programas que usam declarapSes PRINT (ou se o TRACE esta em efeito), o 
439 erro nao vindo de uma declarapao INPUT causa urn salto para o MONITOR. Nesta situapao, 
se o GOTO termina uma sub-rotina de manipulapao de erro (em lugar de RESUME), o 879 erro 
de INPUT causa um salto para o Monitor. 

Pode-se contornar todos esses problemas descritos se a rotina de tratamento de erro incluir 
uma chamada para o programa em linguagem de maquina descrito na Tabela 8.4. 


ON-GOSUB 

Possibilita chamada opcional para uma das varias sub-rotinas num programa em Applesoft, depen- 
dendo do valor atual de uma expressao. 


Formato: 

ON exprnm GOSUB I inha [, Unha . . . ] 

0 programa salta para a primeira linha se o valor inteiro da expressao e 1, para o segundo se e 
2 etc. 0 proximo RETURN encontrado faz o programa voltar para a declarapao seguinte ao ON- 
GOSUB. 

A expressao deve ter um valor na faixa entre 0 e 255 ou a mensagem 7ILLEGAL QUANTITY 


TABELA 8.4. Programa em Linguagem de Maquina para ONNER GOTO. 


LINGUAGEM DE MAQUINA 

LINGUAGEM ASSEMBLER DO 6502 

Decimal 

Hexadecimal 

Instrupao 

Comentario 

104 

68 

PLA 

Coloca o maior byte do stack no 




Acumulador 

168 

A8 

TAY 

Salva-o no Registrador fndice Y 

104 

68 

PLA 

Poe o proximo byte no Acumulador 

166 

A6 

LDX $DF 

Usa apontador do ONNER GOTO 

223 




154 

9A 

TXS 

como enderepo de pilha 

72 

48 

PHA 

Joga o conteudo salvo da pilha na 

152 

98 

TYA 

pilha "ONNER GOTO" (dois 

72 

48 

PHA 

bytes do Acumulador e do regis¬ 




trador Y) 

96 

60 

RTS 

Retorna ao Applesoft 
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ERROR ocorre. Se o calculo da expressao der zero ou um valor maior que o numero de linhas 
listado, a execugao do programa continua a partir da linha seguinte ao ON-GOSUB. 

Nao dispomvel em Integer BASIC. (Mas veja o GOSUB, e a forma do GOSUB calculado para 
o Integer BASIC.) 


ON-GOTO 

Causa um salto condlcional para um dos v3rios pontos do programa Applesoft, dependendo do 
valor corrente de uma expressao. 


Formato: 


ON exprnm GOTO linha [, I inha . . . ] 

0 programa salta para o primeiro numero de linha se o valor inteiro do calculo da expressao e 1, 
para o segundo se e 2 etc. 

A expressao deve ter um valor numerico entre 0 e 255, ou a mensagem 7ILLEGAL QUAN¬ 
TITY ERROR aparece. Se a expressao calculada der zero ou um valor acima do numero de linhas 
listado, a execugao do programa continua na primeira linha a seguir do ON-GOTO. 

Nao dispomvel em Integer BASIC. (Veja GOTO para Integer BASIC, na forma de GOTO 
calculado.) 


OPEN 

Prepara um arquivo de texto sequencial ou aleatorio para acesso. 


Formato: 


OPEN nomearq [, L/7] [, D/?] [, S/7] [, V/7] 

Um buffer na memoria de 595 bytes e alocado para o arquivo de texto especificado. Os coman- 
dos READ e WRITE podem agora ser usados como arquivo para obter e guardar informapao. Se o 
arquivo especificado nao esta no disco, e criado um. Se ele ja esta aberto, ele e fechado e em segui- 
da reaberto. 

Se o parametro L nao e especificado, o arquivo e aberto como sequencial. 

Se o parametro L e especificado, o arquivo e aberto como de acesso aleatorio. 0 numero n 
seguinte ao Leo tamanho do registro em bytes e deve ser uma constante inteira na faixa de 1 a 
32767. Ele pode estar ausente; sendo usado LI. Cada vez que um arquivo particular de acesso 
aleatorio e aberto, o tamanho do registro deve ser o mesmo. 

Se o disco no drive D n do slot Sn nao tiver o volume V/7, ocorre o erro VOLUME MIS¬ 
MATCH. 

Dr?, S/7 e V/7 podem ser especificados em qualquer ordem. Se D/? ou S n e omitido, o drive 
referenciado por ultimo e usado. E usado VO se V/7 esta ausente. Tambem n pode estar ausente, 
quando e adotado DO, SO e VO. 
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Este e um comando DOS e requer PRINT e CTRL-D quando em modo programado. 
OPEN nao pode ser usado em modo imediato. 


PDL 

Listado na segao de funcoes deste capftulo. 


PEEK 

Listado na segao de funcoes deste capftulo. 


PLOT 

Mostra um ponto da tela grafica de baixa resolugao. 


Formato: 


PLOT col, I in 

Em modo grafico de baixa resolugao, PLOT coloca um ponto colorido na tela. A cor do ponto 6 
determinada pela ultima declaragao COLOR executada. 0 numero de coluna varia de 0 a 39. 
A coluna 0 e a mais a esquerda da tela; e a coluna 39 e a mais a direita. Os numeros de linha vao 
de 0 a 47. Linha 0 e a de cima da tela e 47 e a de baixo. Um ponto colocado nas linhas 40 ate 
47 caira nas quatro linhas da janela de texto a menos que uma declaragao POKE —16302,0 
seja executada para eliminar a janela de texto. 

No modo texto ou na janela de texto, o PLOT coloca um caractere colorido, ao inves de um 
ponto na tela. Desde que um caractere ocupa o espago de dois pontos verticals empilhados, exis- 
tem dois conjuntos diferentes de coordenadas PLOT que causam o aparecimento de um dado 
caractere num mesmo ponto. Para colocar um caractere particular na tela, deve dar PLOT em 
ambas as metades da posigao do caractere. 0 caractere que aparece e determinado pela decla¬ 
ragao COLOR executada por ultimo antes que cada metade seja desenhada. 

A Tabela 8.5 mostra os caracteres gerados em cada combinagao de cores nos pontos supe¬ 
rior e inferior. Para gerar um caractere particular, ache-o na Tabela 8.5; veja para cima e para a 
esquerda para ver a cor que se deve usar no PLOT em cada metade do caractere. A metade superior 
do caractere e especificado por um PLOT em uma linha fmpar, e a metade de baixo por um PLOT 
em uma linha fmpar. Se apenas for desenhada a metade de um caractere, o caractere gerado e 
baseado na cor do PLOT e na cor ja presente no outro ponto grafico desenhado. 

Note que cada caractere pode ser gerado por quatro cores diferentes para o ponto grafico 
inferior. Entretanto eles nao sao identicos. 0 caractere gera em vfdeo reverso se o numero da cor 
do ponto inferior for menor que 4, e estarS piscando se o numero estiver entre 4 e 7, sendo da 
forma normal na faixa entre 8 e 15. 
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TABELA 8.5. Caracteres Gerados por Declaragoes Graficas em Modo Texto. 



MODO VIDEO 

COR DO PONTO GRAFICO SUPERIOR 

Para 

Video 

Inverso 

Para 

Caracteres 

Piscando 

Para 

Caracteres 

Normals 

0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 

COR DO 

PONTO GRAFICO 
INFERIOR 

0 

4 

8 

12 

@ 

A 

B 

C 

D 

E 

F 

G 

H 

i 

J 

K 

L 

M 

N 

0 

1 

5 

9 

13 

P 

Q 

R 

S 

T 

U 

V 

W 

X 

Y 

Z 

[ 

\ 

1 

A 

- 

2 

6 

10 

14 

\t> 

! 

" 

# 

$ 

% 

& 

• 

( 

) 

* 

+ 

r 

- 


/ 

3 

7 

11 

15 

0 

1 

2 

3 

4 

5 

6 

7 

8 

9 



< 

= 

> 

? 


POKE 

A declaragao POKE guarda um byte de dado numa posigao de memoria especificada. 


Formato: 


POKE end mem, byte 

Um valor entre 0 e 255, fornecido por byte, e escrito no enderego de memoria endmem. Se a 
posigao de memoria especificada exceder o maximo tamanho de memoria existente (exemplo, 
16383 para sistema com 16K), ou acessar um dispositivo de saida que nao esta operando, o POKE 
nao tera efeito. 

Use com cuidado o POKE. Algumas posigoes de memoria contem informagao essencial para 
a operagao ininterrupta do Apple II. Mexer nessas posigoes de memoria pode destruir o programa, 
travar o sistema ou alterar o BASIC. 


POP 

Faz com que o Apple II esquega a posigao de retorno para o mais recente GOSUB executado. 


Formato: 


POP 

0 POP efetivamente muda o GOSUB mais recentemente executado em uma declaragao GOTO 
(a posteriori). A proxima declaragao RETURN executada pulara para a instrugao em seguida ao 
segundo mais recente GOSUB executado. Se o numero total de declaragoes POP e RETURN 
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executadas num programa exceder o numero de declaragoes GOSUB, ocorre uma mensagem 
de erro. 


POSITION 

Ao mover o apontador de arquivo do disco move-se urn determinado numero de posirpoes para a 
frente. 


Formato: 


POSITION nomearq [, R/ 7 ] 

Se o arquivo nao esta aberto quando POSITION e executado, ele e aberto (veja OPEN). 0 para- 
metro R especifica quantos campos o apontador de arquivo se move para a frente a partir de sua 
posirpao presente. 0 numero a seguir ao R deve ser uma constante inteira num valor entre 0 e 
32767. Se ausente, o parametro adotado e 0, ou seja, o apontador nao se move. Se o arquivo e 
aberto por POSITION, os campos sao contados a partir do seu irn'cio. Esse arquivo deve ser se- 
quencial. 

Um campo consiste numa serie de caracteres terminados com um carriage return. 0 POSI¬ 
TION vai ao longo do arquivo, caractere por caractere, contando tais caracteres; o numero de 
carriages returns encontrado e o numero de campos pulados. Se qualquer caractere nao usado e 
encontrado, a mensagem END OF DATA aparece. 

Este e um comando DOS, e requer PRINT e CTRL-D em modo programado. 

POSITION nao pode ser usado em modo imediato. 


PR# 

Seleciona o slot que ira receber as proximas sai'das. 


Formato: 


PR# slot 

Toda declarapao PRINT a seguir vai mandar dados para o periferico do slot indicado. slot deve ser 
um inteiro entre 0 e 7. O slot 0 nao e um dispositivo periferico. PR#0 especifica a tela de vi'deo 
como safda. Se nao houver periferico no slot especificado, o sistema travara ate que seja acio- 
nado RESET. 

Sempre que o DOS estiver presente na memoria do Apple II, PR# sera considerado um 
comando DOS, e vai requerer PRINT e CTRL-D em modo programado. 


PRINT 


Manda caracteres para a tela ou outro dispositivo de safda. 
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Formato: 


PRINT [ expr] [!,'). . \expr]\. . .] 

Existem diversas variagoes aceitaveis da declaragao PRINT. 0 PRINT sozinho manda um caractere 
carriage return e line feed. Quando e seguido por uma ou mais expressoes, o valor dessas expressoes 
e mostrado. A forma como os valores aparecem depende de sua natureza e do uso de ponto-e-vfr- 
gula ou vfrgula entre eles. 

Todos os valores numericos em Integer BASIC e muitos em Applesoft sao mostrados usando 
representagao numerica padrao. Valores negativos sao precedidos pelo sinal de menos; valores 
positivos nao sao precedidos por sinal ou espago em branco. E usada notagao cientffica em Apple¬ 
soft para valores mais proximos de zero que ±0.01 e por qualquer valor com mais de nove dfgitos 
antes do ponto decimal. 

Os valores cordao aparecem da forma como sao. 

Vfrgulas (,) e pontos-e-vfrgulas (;) determinam o espago entre cada valor mostrado. Um 
ponto-e-vfrgula faz o valor seguinte ser impresso imediatamente apos o ultimo mostrado; eles ficam 
concatenados sem nenhum espago intermediary. Uma vfrgula faz o proximo valor ser colocado 
na posigao de tabulagao seguinte, alguns espagos a frente a partir do ultimo valor. 

Em Integer BASIC, as posigoes de tabulagao sao as colunas 1, 9, 17 etc. Se algum caractere 
diferente de espago e colocado no espago anterior ao de tabulagao (ex. na coluna 16), aquela 
posigao de tabulagao ficara desativada. 

0 Applesoft coloca posigoes de tabulagao em intervalos de 16, nas colunas 1, 17, 33 etc. 
As paradas de tabulagao na tela serao inativadas de acordo com o esquema ilustrado na Tabela 4.1 
(Capftulo 4). Para outros dispositivos, uma parada de tabulagao sera desativada se houver um 
caractere em sua coluna anterior (ex. coluna 32). 

Se uma lista de expressoes nao termina com vfrgula ou ponto-e-vfrgula, e dado um carriage 
return e line feed depois do ultimo item da lista. Se ela termina com ponto-e-vfrgula, o primeiro 
caractere que aparecer na declaragao NEXT seguinte aparecera imediatamente ao ultimo caractere 
mostrado pela declaragao PRINT atual, sem espagos. Se a lista termina com vfrgula, a proxima 
safda iniciara com o caractere na posigao de tabulagao seguinte. 

Em Integer BASIC, todos os itens devem ser separados ou por vfrgula, ou por ponto-e-vfr¬ 
gula. Em Applesoft, os itens podem ser listados sem vfrgulas ou pontos-e-vfrgulas intermediaries. 
A safda para tais itens fica concatenada como se eles fossem separados por pontos e vfrgulas. 

0 Applesoft reconhece o ponto de interrogagao (?) com abreviagao de PRINT. Neste caso a 
palavra PRINT sera apresentada na listagem do programa. 


READ (DECLARAQAO DE DISCO) 

Especifica o arquivo em disco de onde os comandos GET e INPUT pegarao dados. 


Formato: 


READ nomearq [, R/7] [, Bn] 


Se o arquivo ainda nao esta aberto, ele e aberto (veja OPEN). Toda declaragao GET e INPUT 
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recebe caracteres do disco ate que uma declaracao de disco (ou um caractere Ctrl-D (codigo 
ASCII 04) sozinho), RESET seja acionado, ou ocorra um erro. Se o arquivo nao estiver no disco 
a mensagem FILE NOT FOUND aparece. 

0 arquivo sera lido como sequencial se o parametro R estiver ausente. Num arquivo sequen¬ 
tial, o parametro B especifica em qual byte esta (caractere) o READ inicial. Nao tendo B, o READ 
inicia a partir do primeiro byte (byte 0). Se o byte a ser lido nunca foi gravado no disco por meio 
da declaracao WRITE, aparece a mensagem END OF DATA ao se executar alguma instrupao 
INPUT E GET subsequente. 

Se o parametro R esta presente, o arquivo sera acessado como de acesso aleatorio. 0 para¬ 
metro R especifica que registro sera acessado com READ. 

Num arquivo de acesso aleatorio, o parametro B especifica em qual byte do registro especi- 
ficado a leitura se inicia. Sem o parametro B, o READ inicia no primeiro byte do registro (byte 0). 
Se o byte a ser lido nao foi gravado no disco antes com WRITE, a mensagem END OF DATA 
aparece na declaracao INPUT ou GET executada em seguida. 

Os numeros que seguem B e R devem ser constantes inteiras entre 0 e 32767. Se nao especi- 
ficadas, 0 e assumido. 

Nao use o CTRL-C para parar uma declaracao READ no Applesoft. Isso causa uma serie de 
mensagens PREENTER. Use apenas o RESET para parar o programa. 

Este e um comando DOS, e requer PRINT e CTRL-D em modo programado. 

Nao pode ser usado em modo imediato. 


READ (DECLARAQAO DE ATRIBUICAO) 

Associa valores de DATA do Applesoft a variaveis. 


Formato: 


READ var [, var. . . ] 

Existe um apontador para a lista de dados DATA que determina qual valor deve ser associado a 
variavel da declaracao READ. No infcio do programa e apos a declaracao RESTORE, o apontador 
indica o primeiro valor de DATA. A cada declaracao READ em que se atribui um valor para a 
variavel, o apontador passa para o valor seguinte. 

As variaveis podem ser de qualquer tipo, porem devem coincidir com o tipo de dado indi- 
cado pelo apontador do DATA. Um valor numerico atribufdo a uma variavel cordao causa pro- 
blemas. Um cordao associado a uma variavel numerica causa o aparecimento da mensagem de 
erro PSYNTAX ERROR. 0 numero de linha do DATA envolvido tambem e mostrado com a 
mensagem. 

Se o READ tenta ler mais variaveis que as existentes na declaracao data, a mensagem POUT 
OF DATA ERROR e mostrada, com o numero da declaracao READ onde houve o erro. 

0 READ pode ser executado em modo imediato, desde que o programa na memoria tenha 
valores em DATA correspondentes. De outra forma, a mensagem POUT OF DATA ERROR 
aparece. Se o DOS esta presente, o READ em modo imediato e tratado como um comando DOS, 
e a mensagem NOT DIRECT COMMAND e apresentada. 

Nao dispom'vel em Integer BASIC. 
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RECALL 

Pega um arranjo numerico do Applesoft a partir da fita cassette. 


Formato: 


RECALL varnm 

0 Applesoft espera indefinidamente ate que um arranjo seja achado na fita; nenhuma outra decla¬ 
ragao pode ser executada nesse mterim. 0 RECALL nao controla o movimento da fita nem infor¬ 
ma quando acionar o botao PLAY do gravador. Deve-se acrescentar informagao atraves de PRINT 
antes de uma declaragao RECALL advertindo o inicio do processo. 0 Apple II tambem sinaliza 
com bip quando comega a carregar um arranjo e da outro bip quando para. 0 arranjo deve ser 
dimensionado antes da declaragao RECALL ser executada, ou a mensagem ?OUT OF DATA 
ERROR aparece (veja DIM). 

Na declaragao RECALL nao e necessario usar os mesmos nomes de variaveis usados na decla¬ 
ragao STORE que gravou o arranjo. Se o arranjo da fita contiver mais elementos que os solicitados 
pelo RECALL, o erro ?OUT OF DATA ERROR aparece. Se o arranjo chamado content no mi'ni- 
mo tantos elementos quantos foram gravados, porem sem as mesmas dimensoes a mensagem ERR 
e gerada, porem a execugao do programa continua. 

Se o arranjo chamado tiver mais elementos que o gravado, os valores obtidos normalmente 
sao danificados. Existem duas opgoes. Pode-se chamar para um arranjo com o mesmo numero de 
dimensoes do gravado, onde cada dimensao exceto a ultima tenha o mesmo tamanho da dimensao 
correspondente do arranjo gravado. A ultima dimensao pode ser mais larga no arranjo chamado. 
Pode-se tambem chamar para um arranjo com mais dimensoes que o gravado, se as dimensoes 
que estao no arranjo coincidem com aquelas do arranjo chamado (ou as exceda, no caso de ultima 
dimensao do arranjo gravado). 

Arranjos tipo cordao nao podem ser usados com RECALL. Porem os valores numericos po- 
dem ser convertidos para cordao usando a fungao CHR$. 

Nao dispomvel em Integer BASIC. 


REM 

A declaragao REM permite comentarios a serem colocados no programa para efeito de docu- 
mentagao. 


Formato: 


REM comentario 

comentario e qualquer seqiiencia que caiba na linha de programa. 

As declaragoes REM sao reproduzida na listagem do programa, porem sao ignoradas durante 
sua execugao. A declaragao REM pode ser colocada numa linha sozinha ou como uma das decla¬ 
ragoes de uma linha multipla. 
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0 REM nao pode ser colocado a frente de outras declaragoes numa linha multipla, porque 
todo o texto que segue e tratado como um comentario. 


RENAME 

Troca o nome de um arquivo em disco sem alterar seu conteudo. 


Formato: 


RENAME nomearq lf nomearq 2 [, D/ 7 ] [, S n] [ , V/ 7 ] 

0 arquivo com nome nomearq x e achado no disco, e tern seu nome trocado por nomearq 2 . Se o 
arquivo esta aberto, ele e fechado (veja CLOSE). 0 arquivo nao e afetado em seu conteudo. 

RENAME pode trocar o nome do arquivo por outro que jS exista dentro do disco; e pode 
faze-lo muitas vezes, Por isso deve-se ter cuidado para nao escolher para um arquivo um nome que 
ja exista no disco, antes de executar o RENAME. 

Se nomearq x nao existe no drive D n do slot S/7, a mensagem de erro FILE NOT FOUND 
aparece. Se o disco no drive Dn do slot S/7 nao tern volume V/7, a mensagem VOLUME MISMATCH 
aparece. 

Dn, S/7 e V/7 podem aparecer em qualquer ordem. Se Dn e Sn sao omitidos, o drive referen- 
ciado por ultimo e usado. VO e usado se Vn nao for colocado. Tambem n pode estar ausente, 
quando DO, SO e VO sao adotados. 

Este e um comando DOS, e requer PRINT e CTRL-D em modo programado. 


RESTORE 

Coloca o apontador do DATA no infcio da lista. 


Formato: 


RESTORE 

A declaracao READ subseqiiente vai operar a partir do primeiro valor da lista do DATA. 
Nao disponfvel em Integer BASIC. 


RESUME 

Faz o programa em Applesoft voltar a execugao no infcio da instrugao onde o erro ocorreu. 


Formato: 


RESUME 
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0 RESUME nao pode ser usado apos uma declarapao ONERR GOTO ter sido usada no trata- 
mento do erro. Se o RESUME e executado sem ter ocorrido erro, o resultado e imprevisi'vel, mas 
em geral tragico. 

Nao dispom'vel em Integer BASIC. 

Nao pode ser usado em modo imediato. 


RETURN 

Faz o programa saltar para a declarapao abaixo da ultima declarapao GOSUB executada. 


Formato: 


RETURN 

A declarapao POP faz o programa esquecer o enderepo de retorno do GOSUB mais recente. 
Uma declarapao RETURN apos urn pop faz voltar para o enderepo seguinte ao segundo mais 
recente GOSUB. 

Se forem executadas mais declarapoes RETURN (ou POP) do que GOSUB, aparece uma 
mensagem de erro. 


ROT = 


Esta declarapao do Applesoft muda a orientapao do desenho da forma grafica de alta resolupao 
feito por DRAW ou XDRAW. 


Formato: 


ROT = exp mm 

ROT=0 desenha a forma na orientapao que foi definida. A forma e rodada em 90 graus em 
sentido horario para cada incremento de 16 no valor de exprnm. Assim, ROT=32 desenha uma 
forma de cabepa para baixo, e ROT=64 desenha-a em sua forma original. Valores de exprnm 
maiores que 64 nao calculados no modulo 16. 

Quando SCALE foi colocado em 1, so existem quatro formas possi'veis de ROT = . Sao elas 
0, 16, 32 e 48 (e os valores maiores que 63 equivalentes). Quando SCALE e igual a 2, ficam 
existindo oito valores possi'veis para ROT=, quando SCALE = 3, existem 16 valores etc. ate o 
maximo de 64 valores diferentes. Um valor nao reconheci'vel do ROT= sera tratado como se fosse 
o valor reconheci'vel seguinte. 

exprnm deve ter um valor calculado entre 0 e 255. ou a mensagem ?ILLEGAL QUANTITY 
ERROR e gerada quando o comando ROT= e executado. 

ROT= nao e reconhecido como uma palavra reservada, a menos que o caractere " = " 
seja o primeiro caractere diferente de espaco. 

Nao dispom'vel em Integer BASIC. 
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RUN (DECLARAgAO DE DISCO) 

Carrega e executa um programa do disco. 


Formato: 


RUN nomearq [, Da?] [, Sn] [, V/7] 

0 programa chamado nomearq e carregado do disco e executado. Se o carregamento for correto, 
qualquer programa anterior da memoria e zerado. 

Se o programa a ser carregado for em Integer BASIC e o Apple II estiver em Applesoft, ou 
vice-versa, ele fara a mudanga automaticamente para a linguagem adequada. Se necess^rio carre- 
gara o interpretador Applesoft a partir do disco especificado. Se a linguagem nao estiver disponf- 
vel, a mensagem LANGUAGE NOT AVAILABLE aparecera. 

Se o arquivo nao existe no drive On do slot S/7, a mensagem FILE NOT FOUND aparecera. 
Se o disco do drive On do slot Sn nao tiver volume V/? a mensagem de erro VOLUME MISMATCH 
aparecera. 

On, Sn e V/7 podem ser especificados em qualquer ordem. Se On e S/7 sao omitidos, o drive 
referenciado por ultimo e adotado. VO e usado por ausencia de V/7. Tambem n pode estar ausente, 
quando DO, SO e VO sao adotados. 

Este e um comando DOS e requer PRINT e Ctrl-D em modo programado. 


RUN (DECLARAgAO GERAL) 

Executa o programa presente na memoria, iniciando no numero de linha especificado, se existir; 
de outra forma, e usado o enderego mais baixo do programa. 

Formato Geral: 

RUN [/inha] 

Se nao existir linha de nome linha a mensagem *** BAD BRANCH ERR em Integer BASIC e 
?UNDEF'D STATEMENT ERROR em Applesoft aparecera. 


Formato Adicional do Integer BASIC: 

RUN exprnm 

Em Integer BASIC, o numero de linha pode ser uma expressao numerica. 
RUN so pode ser usado no modo imediato em Integer BASIC. 


SAVE 


Guarda o programa da memoria em cassette ou disco. 
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Formato em Cassette: 

SAVE 

Guarda o programa presente na memoria em fita cassette. Deve-se ter a fita em modo RECORD 
quando SAVE e executado. 0 Apple II nao indica quando faze-lo. Ele apita quando inicia a 
gravagao do programa e apita de novo quando termina. 0 segundo apito e o sinal para parada 
manual do gravador. 

So pode ser usado em modo imediato em Integer BASIC. 


Formato em Disco: 

SAVE nomearq [ , Dfl] [, S n] [, Mn] 

Se nao existe arquivo com nome nomearq no disco, e criado um com aquele nome e a linguagem 
do programa atual. 0 programa e guardado. Se existe um arquivo chamado nomearq na mesma 
linguagem do programa corrente, o conteudo daquele arquivo e zerado e o programa corrente e 
guardado em seu lugar. Se o programa nomearq existe, porem em linguagem diferente ou com tipo 
diferente, a mensagem FILE TYPE MISMATCH aparece. 

Se o arquivo nao existe no drive D n do slot S n, a mensagem FILE NOT FOUND aparecera. 
Se o disco do drive Dn do slot S n nao tiver volume Mn a mensagem de erro VOLUME MISMATCH 
aparecera. 

Dn, Sn e V/7 podem ser especificados em qualquer odem. Se Dn e Sn sao omitidos, o drive 
referenciado por ultimo e adotado. VO e usado por ausencia de Mn. Tambem n pode estar ausente, 
quando DO, SO e VO sao adotados. 

Este e um comando DOS e requer PRINT e Ctrl-D em modo programado. 


SCALE 

Esta declaragao Applesoft d2 o tamanho da forma grafica de alta resolugao desenhada por DRAW 
ou XDRAW. 


Formato: 


SCALA= exprnm 

O tamanho da forma da tabela e multiplicado pelo valor de exprnm. Assim, se SCALE=1 a forma 
sera desenhada como foi definida. Se SCALE = 2 sera desenhada com o dobro do tamanho. Se 
SCALE = 0, a forma sera desenhada 255 vezes maior que o tamanho original. 

0 valor de exprnm deve ser um inteiro entre 0 e 255 ou a mensagem ?l LLEGAL QUANTITY 
ERROR ocorre quando o comando SCALE e executado. 

SCALE nao e reconhecido como palavra reservada a menos que o caractere " = " seja o 
primeiro a seguir diferente de branco (espago). 

Nao dispom'vel em Integer BASIC. 


COMPfiNDIO DE DECLARAQOES DO BASIC 


303 


SHLOAD 

Esta declaragao do Applesoft carrega uma forma grafica de alta resolugao da fita cassette. 


Formato: 


SHLOAD 

A construgao e o armazenamento de forma grafica em cassette e estudada no Capftulo 6. 

A forma grafica e carregada imediatamente abaixo de HI MEM: e HI MEM. e colocado imedia- 
tamente abaixo da forma. Entao o enderego inicial da forma e carregado nos enderegos de memo- 
ria 22 e 23. 

Antes que se execute SHLOAD certifique-se de ter colocado HIMEM: de forma que a tabela 
nao seja carregada sobre o programa ou variaveis e nao va ser zerada pelos graficos. Veja o estudo 
sobre HIMEM: neste capftulo, mapas de memoria no Apendice G e no Capftulo 6 para maiores 
detalhes. 

Nao disponfvel em Integer BASIC. 


SPEED 

Esta declaragao Applesoft troca a frequencia com que os caracteres sao safdos. 


Formato: 


SPEED = exprnm 

O valor de exprnm determina a frequencia com a qual os caracteres aparecerao na tela ou outro 
dispositivo de safda. A velocidade varia de 0 (mais lenta) ate 255 (mais rapida). 

Nao disponfvel em Integer BASIC. 


STOP 

Faz o Applesoft parar a execugao do programa. 


Formato: 


STOP 

0 Apple II retorna ao modo imediato. A mensagem BREAK IN linha aparece, onde linha e o 
numero da linha na qual o programa parou. 

Nao disponfvel em Integer BASIC. 
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STORE 

Guarda um arranjo especi'fico do Applesoft em fita cassette. 


Formato: 


STORE varnm 

0 STORE naocontrolao movimento da fita nem adverte quando se deve acionar o botao RECORD 
do gravador. Deve-se ter o cassette rodando e pronto para gravar quando o STORE e executado. 
O programa em Applesoft deve mostrar indicapoes (via declarapao PRINT). 0 Apple II sinaliza 
quando inicia a guarda de valores e sinaliza de novo quando termina. 

So se pode usar STORE para guardar valores numericos; variaveis cordao devem ser conver- 
tidas para valores inteiros usando a funpao ASC antes de salvar (veja tambem RECALL). 

Nao dispom'vel em Integer BASIC. 


TAB 

Esta declarapao em Integer BASIC posiciona o cursor numa coluna especi'fica na linha corrente. 


Formato: 


T AB col 

0 cursor se move para a direita ou para a esquerda de acordo com o valor de col, sem zerar os 
caracteres \i mostrados. As colunas sao numeradas de 1 a 40 (da esquerda para a direita). 

Para Applesoft, use a declarapao HTAB. Veja tambem a funpao TAB na sepao sobre funpoes 
neste capi'tulo. 


TEXT 

Retorna a tela para o modo texto a partir de qualquer um dos modos graficos. 


Formato: 


TEXT 

0 caractere de entrada e o cursor sao movidos para a ultima linha da tela; se em modo texto 
este e o unico efeito. Se a janela de texto foi colocado como algo diferente de tela cheia, o TEXT 
apaga a tela cheia. 

0 TEXT nao apaga a tela, ou mais precisamente, nao limpa a pagina 1 de memoria de baixa 
resolupao. Desde que o modo texto normal usa a mesma tela que o grafico em baixa resolupao, a 
execupao de TEXT no modo grafico de baixa resolupao deixa as 20 linhas de cima da tela cheias 
de caracteres estranhos. 
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TRACE 

Mostra o numero da linha de cada declaragao executada. 


Formato: 


TRACE 

Esta ferramenta de depuracao causa o aparecimento dos numeros das linhas entremeado com os 
caracteres sai'dos pelo programa, o que pode tornar um ou ambos ininteligfveis. 0 TRACE e desa- 
tivado com o NO TRACE. 


UNLOCK 

Remove o estado de travado de um arquivo em disco, de forma que ele pode ser alterado ou 
eliminado. 


Formato: 


UNLOCK nomearq [, Dn] [, S/ 7 ] [, Vn] 

Se o arquivo especificado esta travado, a trava e removida. Se nao, nada acontece (veja LOCK). 

Se o arquivo nao existe no drive Dn do slot Sn, a mensagem FILE NOT FOUND aparece. 
Se o disco no drive Dn do slot Sn nao tern volume Vn, aparece o erro VOLUME MISMATCH. 

Dn, Sn e Vn podem aparecer em qualquer ordem. Se Dn e Sn sao omitidos o drive referen- 
ciado por ultimo e usado. Quando Vn esta ausente, VO e adotado. Tambem n pode estar ausente, 
quando DO, SO e VO sao adotados. 

Este e um comando DOS, e requer PRINT e Ctrl-D em modo programado. 


USR 

Listado na parte de funpoes deste capftulo. 


VERIFY 

Verifica um arquivo especffico em disco para testar autoconsistencia. 

Formato: 

VERIFY nomearq [, D/ 7 ] [, Sn] [, Vn] 

Quando um arquivo e guardado em disco com SAVE, BSAVE ou PRINT, e calculado um dfgito 
de verificacao para cada setor, que tambem e gravado no disco. 0 VERIFY recalcula este dfgito e 
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o compara com o gravado. Se eles coincidirem, o arquivo esta intacto e nada aparece na tela. Se 
ocorrerem erros em um ou mais setores, a mensagem I/O ERROR e gerada. Pode ser verificado 
qualquer tipo de arquivo. 

Se o arquivo nao existe no drive Dn do slot Sn, a mensagem FILE NOT FOUND aparece. 
Se o disco no drive Dn do slot Sn nao tern volume \Zn, aparece o erro VOLUME MISMATCH. 

Dn, Sn e Va? podem aparecer em qualquer ordem. Se Dn e Sn sao omitidos o drive referen* 
ciado por ultimo e usado. Quando \/n est3 ausente, VO e adotado. Tambem n pode estar ausente, 
quando DO, SO e VO sao adotados. 

Este e um comando DOS, e requer PRINT e Ctrl-D em modo programado. 


VLIN 

Desenha uma linha vertical na tela, na forma grafica de baixa resolugao. 


Formato: 


VLIN lin lf lin 2 , AT col 

A linha e desenhada de Hn y ate Hn 2 na coluna especificada por col. A cor e determinada pela 
declaragao COLOR executada por ultimo. Se a tela estiver em modo texto, ou se a janela de texto 
estiver presente com a linha maior que 39, parte ou a totalidade da linha aparecera como caracteres 
ao inves de pontos. Os caracteres usados sao determinados pela declaragao COLOR anterior; 
veja a Tabela 8.5 (perto da declaragao PLOT neste capftulo) para particularidades. 

Em Integer BASIC, lin l deve ser menor ou igual a lin 2 , ou a mensagem *** RANGE ERR 
aparece. 


VTAB 

Posiciona o cursor para uma linha especificada na coluna atual. 


Formato: 


VLIN Hn 

0 cursor se move para cima ou para baixo ate a linha especificada pelo valor de tin, sem zerar 
nenhum dos caracteres da tela. As linhas sao numeradas de 1 a 24 (de cima para baixo). 


WAIT 

Para a execugao de um programa Applesoft ate que um enderego de memoria tenha uma con- 
digao especificada. 
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Formato: 


WAIT end mem, expmm x [, exprnm 2 ] 

O WAIT verifica parte ou o total dos oito bits da posigao de memoria endmem, para testar o pa- 
drao de uns e zeros especificado por exprnm x . 0 valor binario de exprnm x determina quais bits 
da posigao de memoria devem ser considerados e quais devem ser ignorados. Se um bit de exprnm x 
e 1, entao o bit correspondente da posigao endmem e testado. O WAIT ignora aqueles bits de 
memoria que sao correspondentes a 0 no valor binario de expmm 2 . 

Enquanto os bits significativos (determinados por exprnm x ) de endmem forem todos dife- 
rentes do valor correspondente de exprnm 2 , a espera continua. No momento em que qualquer par 
for identico (ou 1 ou 0) a espera termina e o programa Applesoft continua. 

Se exprnm 2 nao esta presente, e adotado 0. 

O WAIT so pode ser interrompido por Reset (ou desligamento). O valor das expressoes 
numericas devem estar na faixa de 0 ate 255 ou a mensagem 7ILLEGAL QUANTITY ERROR e 
gerada. Se a posigao de memoria especificada e maior que a posigao de memoria mais alta, (ex. 
32767, com 32K de memoria), ou acessar um dispositive de safda que nao esta operando, o WAIT 
trava o sistema ate o acionamento do RESET. 

Nao dispomvel em Integer BASIC. 


WRITE 

Especifica um arquivo em disco para onde as sai'das subsequentes serao mandadas. 


Formato: 


WRITE nomearq [ , R/ 7 ] [, Bn] 

Se o arquivo especificado nao esta aberto, ele o e (veja OPEN). As declaragoes PRINT subse¬ 
quentes mandarao dados no disco ate uma declarapao de disco (ou o caractere CTRL-D (codigo 
ASCII 4) sozinho) seja mandado. Se o arquivo nao estiver no disco, a mensagem FILE NOT 
FOUND aparecera. 

O arquivo sera tratado como sequencial se o parametro R estiver ausente. Num arquivo 
sequencial, o parametro B especifica em que byte (caractere) o WRITE inicia. Sem o parametro 
B, o WRITE inicia no primeiro byte do arquivo (byte 0). 

Se o parametro R esta presente, o arquivo sera gravado como arquivo de acesso aleatorio. 
0 WRITE e para o registro especificado pelo parametro R. 

Num arquivo de acesso aleatorio, o parametro B especifica em que byte dentro de um regis¬ 
tro especificado o WRITE inicia. Sem o parametro B, o WRITE inicia no primeiro byte (byte 0) 
do registro. 

O parametro B pode ser usado para gravar iniciando num ponto alem do ultimo caractere 
do arquivo (ou registro). Este dado pode ser lido (com READ), porem qualquer tentativa de ler 
bytes intermediaries nao usados vai gerar a mensagem OUT OF DATA. 

Os numeros a frente de R e B devem ser inteiros na faixa de 0 ate 32767. Se nao especifi- 
cados, 0 e usado. 
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Enquanto WRITE estiver em uso, todo caractere que o Apple II mandaria normalmente 
para a tela sera mandado para o disco. Incluindo pontos de interrogacao gerados por INPUT e as 
mensagens de erro. 

Este e um comando DOS, e requer PRINT e Ctrl-D em modo programado. 

Nao pode ser usado em modo imediato. 


XDRAW 

Esta declaragao Applesoft desenha uma forma grafica de alta resolugao na tela e, se usada uma 
segunda vez com os mesmos parametros, limpa a forma. 


Formato: 


XDRAW exprnm [AT colh, linh ] 

A forma numero exprnm da tabela de formas e desenhada, com cada ponto na cor que e o com- 
plemento da cor da tela no ponto. Cores 0 e 3 sao um par complementar, como sao 1 e 2, 4 e 7, 
e 5 e 6 (veja Tabela 8.3). A escala e rotagao da forma deve ser dada pelos comandos COLOR e 
SCALE antes do comando XDRAW ser executado. 

Usa-se XDRAW ao inves de DRAW de forma que se pode facilmente limpar uma forma 
desenhada. Como XDRAW desenha na cor complementar a cor anterior do ponto, se executada 
duas vezes (ou quatro, ou seis), com os mesmos parametros, a declaragao XDRAW, tudo o que 
estiver na tela nao sera alterado. 

Se nao se especifica uma posigao na declaragao XDRAW, a forma e desenhada iniciando na 
posigao desenhada por ultimo no comando DRAW, XDRAW ou PLOT anterior. Se nao se espe- 
cificar posigao, o desenho inicia naquele ponto (colh, linh). 

0 numero da forma, exprnm, deve ser um valor inteiro entre 0 e o numero de formas da 
tabela (que nao deve exceder 255), inclusive. 

Nao dispom'vel em Integer BASIC. 


FUNCOES 


As fungoes do BASIC do Apple II sao descritas abaixo em ordem alfabetica. A nomenclatura e 
as abreviagoes sao descritas no im'cio deste capi'tulo. 

Muitas das fungoes sao dispom'veis apenas em Applesoft. Estas fungoes sao identificadas 
apropriadamente. 


ABS 


Retorna o valor absoluto de um numero. Isto e, o valor sem sinal. 
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Formato: 


ABS (exprnm) 


ASC 

Retorna o codigo ASCII de um caractere especificado. 


Formato: 


ASC ( expr$) 

Se o cordao tem mais de um caractere, o ASC devolve o codigo do primeiro caractere do cordao. 
0 codigo devolvido nao e necessariamente o menor codigo (na faixa 0-95) que aquele caractere. 
Os caracteres gerados pelo codigo ASCII entre 96 e 255 duplicam aqueles da faixa menor na tela. 
Entretanto, eles nao sao calculados como os mesmos caracteres pelos operadores relacionais como 
<, > e =. Eles devem ser tratados diferentemente para impressoras e outros dispositivos, da 
mesma forma. Se o primeiro caractere da expr$ e CTRL-@ (codigo ASCII 0), a mensagem ?SYN- 
TAX ERROR aparece. Se expr$ e um cordao nulo, a mensagem 7ILLEGAL QUANTITY ERROR 
aparece. 

Os codigos ASCII sao listados no Apendice I. 


ATN 

Retorna o arco tangente de um argumento. 

Formato: 

ATN ( exprnm) 

Calcula o arco tangente, em radianos, de exprnm. 0 angulo devolvido esta na faixa entre —7r/2 ate 
7 t/2. 

Nao disponfvel em Integer BASIC. 


CHR$ 

Retorna o valor cordao de um codigo ASCII especificado. 

Formato: 


CHR$ ( exprnm) 

Retorna o caractere representado pelo valor inteiro da expressao exprnm, interpretado como um 
codigo ASCII. Acha-se a tabela de codigos ASCII no Apendice I. Use esta funpao para gerar carac- 
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teres que nao se consegue obter a partir do teclado para controle de perifericos etc. 0 valor de 
exprnm deve estar entre 0 e 255 ou a mensagem 7ILLEGAL QUANTITY ERROR aparecera. 
Nao disponfvel em Integer BASIC. 


COS 

Retorna o cosseno de um angulo. 

Formato: 

COS ( exprnm) 

Calcula o cosseno de exprnm radianos. 
Nao disponfvel em Integer BASIC. 


EXP 

Retorna e elevado a uma potencia. 

Formato: 

EXP ( exprnm ) 

Calcula e (a base do logaritmo natural: 2,718281828) elevado a potencia exprnm. 
Nao disponfvel em Integer BASIC. 


FN 

Chama uma fungao definida pelo usuario defipida anteriormente. 


Formato: 


FN varnm ( exprnm) 

varnm e o nome da fungao. O valor da expressao e adotado sempre que a variavel fictfcia aparece 
rra definigao da fungao, e o resultado da expressao e calculado. Veja DEF FN na parte de decla- 
ragoes neste capftulo. 

Uma fungao nao pode ser recursiva, isto e, exprnm nao pode referenciar FN varnm nem 
outra fungao que, por sua vez, referencie FN varnm. 

Ao se tentar usar FN varnm antes da definigao de fungao DEF FN varnm aparece a mensa¬ 
gem de erro PUNDEF'D FUNCTION ERROR. 

Nao disponfvel em Integer BASIC. 
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FRE 

Retorna o numero de bytes da memoria presentemente disponfvel para o programa BASIC em 
Applesoft. 

Formato: 

FRE ( exprnm) 

A memoria disponfvel e aquela abaixo da area de armazenamento de cordoes e acima da area de 
armazenamento de arranjos. Existindo mais de 32767 bytes de memoria livres, o FRE devolve um 
numero negativo. Some 65536 ao numero para achar o tamanho real da memoria disponfvel. 

0 FRE tambem limpa cordoes nao usados da area de armazenamento. Quando um cordao 
troca de valor durante um programa, o valor anterior e deixado na memoria, e o novo valor e 
acrescentado a tabela. Eventualmente isso pode ser danoso, se for usado para outra coisa. Para 
evitar essa operagao, use a declaragao A = FRE(O) com alguma frequencia em programas que 
usam cordoes extensivamente. 

0 valor de exprnm nao e usada por FRE, porem causa um erro se ilegal. 

Nao disponfvel em Integer BASIC. 


INT 

Retorna a parte inteira de um numero. 

Formato: 

INT ( exprnm) 

Retorna o maior inteiro menor ou igual ao valor de exprnm. 
Nao disponfvel em Integer BASIC. 


LEFTS 

Retorna o caractere mais a esquerda de um cordao. 


Formato: 


LEFTS {expr$,exprnm) 

Retorna o caractere mais a esquerda de expr$. exprnm deve ser um inteiro entre 1 e 255, e expr$ 
nao pode ter mais de 255 caracteres. Se exprnm for maior que o tamanho de expr$, todo o cordao 
e devolvido. 

Nao disponfvel em Integer BASIC. 
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LEN 

Retorna o comprimento de um cordao. 


Formato: 


LEN ( expr$) 

Conta o numero de caracteres de expr$, incluindo todos os espacos e caracteres nao imprirm'veis. 
Se expr$ tem mais de 255 caracteres (possivel apenas se expr$ e produto de concatenacao de 
cordoes), a mensagem 7 STRING TOO LONG ERROR aparece. 


LOG 

Retorna o iogaritmo natural de um numero. 


Formato: 


LOG ( exprnm) 

Calcula o Iogaritmo natural de exprnm. Retorna ?lLLEGAL QUANTITY ERROR se exprnm e 
zero ou negativo. 

Nao dispom'vel em Integer BASIC. 


MID$ 

Retorna a porpao especificada de um cordao. 


Formato: 


MID ( expr$, exprnm x [, exprnm 2 ]) 

Retorna exprnm 2 caracteres de expr$, iniciando no caractere exprnm j. Se exprnm 2 estiver ausen- 
te, MID$ retorna a porpao de expr$ a partir do caractere exprnm x ate o ultimo. Se o comprimento 
de expr$ e menor que exprnm x , o cordao nulo e devolvido. Se existem menos que exprnm 2 carac¬ 
teres em expr$ apos exprnm lt o resultado e o mesmo que se exprnm 2 estiver ausente. expr$ nao 
deve exceder a 255 caracteres, e exprnm x e exprnm 2 ambos devem estar entre 1 e 255. 

Nao disponfvel em Integer BASIC. 


PDL 


Retorna o valor corrente do controlador de jogo (paddle) especificado. 
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Formato: 


PDL (exprnm) 

O valor retornado e um inteiro entre 0 e 255 baseado na rotacao do paddle numero exprnm, ou 
da resistencia do dispositivo conectado ao soquete do controlador de jogo exprnm. Os contro- 
ladores de jogo sao numerados de 0 a 3. Se for indicado um controlador menor que 0 ou maior 
que 255 a mensagem 7ILLEGAL QUANTITY ERROR e gerada. Se o controlador for entre 4 e 
255, o PDL retorna um valor imprevisfvel entre 0 e 255, podendo causar varios efeitos colaterais, 
tal como um sinal no alto-falante ou um subito deslocamento no modo grafico. 

Se duas instrucoes PDL sao executadas consecutivamente ou muito proximas, o segundo 
valor pode ser afetado pelo primeiro. Providencie para que varias instrucoes sejam executadas 
entre dois PDL (ou coloque um loop FOR-NEXT vazio). 


PEEK 

Retorna o valor de uma posicao de memoria. 

Formato: 

PEEK (endmem) 

0 valor retornado e o equivalente decimal aos oito bits da memoria enderecada por endmem. 0 
Apendice E lista algumas posipoes de memoria importantes. 


POS 

Retorna a coluna onde o cursor esta posicionado. 


Formato: 


POS ( exprnm) 

A expressao e ficti'cia; nao e usada, podendo ter qualquer valor legal. 

0 POS retorna um valor entre 0 e 39. As posipoes iniciam em 0 para o caractere mais a 
esquerda. 

Nao dispomvel em Integer BASIC. 


RIGHTS 


Retorna o caractere mais a direita de um cordao. 
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Formato: 


RIGHTS ( expr$, exprnm) 

Retorna o caractere mais a direita do cordao expr$. 0 valor de exprnm deve ser um inteiro entre 0 
e 255, e expr$ nao pode ter mais de 255 caracteres. Se exprnm e maior ou igual ao comprimento 
de expr$, o cordao inteiro e retornado. 

Nao disponfvel em Integer BASIC. 


RND 

Retorna um numero aleatorio. 


Formato: 


RND ( exprnm ) 

Retorna um numero aleatorio, na faixa que depende do valor de exprnm e da versao do BASIC. 

Em Integer BASIC, o RND retorna um aleatorio entre 0 e o valor de exprnm, exclusive 
exprnm mas inclusive 0. Assim, RND(1) sempre retorna 0, e RND(—2) produz um misto de 0 e 
—1. Ao tentar se usar RND(O) aparece a mensagem de erro *** > 32767 ERR. 

Em Applesoft, RND sempre retorna um numero real maior ou igual a 0 e menor que 1. 
0 valor retornado pode ser de tres tipos, dependendo do sinal de exprnm. 

Se exprnm e positiva, RND retorna um valor diferente a cada vez que e usado, a menos que 
uma sequencia repetida tenha sido iniciada. 

Uma sequencia repetida tern infcio quando exprnm e um numero negativo. Qualquer valor 
particular sempre inicia a mesma sequencia; os argumentos positives suhsequentes sempre vao 
retornar a mesma sequencia de numeros aleatorios. Uma sequencia repetida diferente vai retornar 
para cada valor negativo diferente de exprnm. Esta caracterfstica e util para teste e depuracao de 
programas que usam RND. 

Se exprnm for 0 em Applesoft, RND retorna o numero aleatorio mais recentemente gerado 
(isso nao e afetado por NEW ou CLEAR). 


SCRN 

Retorna o codigo da cor do ponto grafico de baixa resolucao com as coordenadas especificadas. 


Formato: 


SCRN (col, tin) 

Se a tela esta em modo texto, ou a janela de texto esta presente e o ponto especificado esta dentro 
dela, o SCRN devolve o codigo de cor de metade do caractere. 0 codigo da cor da metade de cima 
do caractere e devolvida se lin e par, e da metade inferior se lin e fmpar. 0 codigo ASCII do carac- 
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tere na posicao (a, b ) (com a na faixa de 0-39 e b na faixa de 0-23) e devolvido pela expressao 
SCRN (a, 2 * b) + 16 * SCRIM (a, 2*6 + 1). Assim, o caractere e devolvido por CHR$(r?), onde n 
e o valor obtido pela expressao acima. 

Se col esta na faixa de 0-39, SCRN retorna o codigo da cor do ponto grafico {col, lin). 
Se col esta na faixa 0-47 e lin na faixa 0-31, SCRN devolve o ponto o numero da cor do ponto 
grafico (col —40, tin +16). Se col esta na faixa 40-47 e tin na faixa de 32-47, SCRN devolve um 
numero sem relacao com nada na tela. 

Se SRCN e usado durante o modo grafico de alta resolupao, o numero devolvido esta rela- 
cionado com area de memoria grafica de baixa resolupao em vez de alta resolupao. 

SRCN so e reconhecida como palavra reservada se o primeiro caractere diferente de espapo 
a sua frente for parenteses. 


SGN 

Determina se um numero e positivo, negativo ou zero. 

Formato: 


SGN ( exprnm ) 

A funpao SGN retorna +1 se exprnm e positiva, — 1 se e negativa, e 0 se exprnm e 0. 


SIN 

Retorna o seno de um angulo. 

Formato: 

SIN ( exprnm) 

Calcula o seno de exprnm radianos. 

Nao dispom'vel em Integer BASIC. 


SPC 

Move o cursor para a direita de um numero especificado de posicoes. 

Formato: 

SPC ( exprnm ) 

A funpao SPC e usada nas declaracoes PRINT para imprimir exprnm espacos em branco. Assim, 
qualquer caractere passado pelo cursor e zerado. 
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A funcao SPC move o cursor para a direita a partir da coluna em que ele estiver no momento 
em que SPC for encontrado. Este e um contraste com a fungao TAB, que move o cursor para 
numeros de coluna fixos a partir da coluna mais a esquerda da tela. 

Nao dispomvel em Integer BASIC. 


SQR 

Retorna a raiz quadrada de um numero positivo. 


Formato: 


SQR (exprnm) 

Um valor negativo de exprnm causa a mensagem de erro 7ILLEGAL QUANTITY ERROR. SQR 
(exprnm ) opera mais rapidamente que ( exprnm ) A (.5). 

Nao dispom'vel em Integer BASIC. 


STR$ 

Converte um valor numerico em cordao. 


Formato: 

STR$ ( exprnm) 

0 valor de exprnm e convertido em cordao. 0 cordao de caracteres e o mesmo que se obteria com 
PRINT exprnm. Assim, STR$(2/3) = ".666666667" e STR$(2468013579) = "2.46801358E + 09". 
Se exprnm exceder o limite para numeros reais, a mensagem 70VERFL0W ERROR aparece. 
Nao dispomvel em Integer BASIC. 


TAB 

TAB move o cursor para a direita de um numero especificado de colunas. 


Formato: 


TAB ( exprnm ) 

Use TAB com PRINT para mover o cursor para a coluna exprnm, se exprnm estiver a direita da 
posipao atual do cursor. 0 cursor nao se move se a posicao de tabulacao estiver a sua esquerda 
e em sua posigao. TAB coloca caracteres em branco durante o movimento do cursor para a direita, 
de forma que zera o que havia previamente na tela. 
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Para TAB, as colunas sao numeradas de 1 a 255. Se exprnm e maior que o comprimento 
do dispositivo de safda (40 caractere para o vfdeo), ele move o cursor uma linha para baixo e con- 
tinua contando a partir da margem esquerda. Se o valor de exprnm e 0, TAB move para a coluna 
256. Um valor de exprnm fora da faixa de 0 a 255 causa a mensagem de erro 7ILLEGAL QUAN¬ 
TITY ERROR. 

Veja tambem HTAB (Applesoft) e TAB (Integer BASIC) na parte de declarapoes neste 
capftulo. 

Nao disponfvel em Integer BASIC. 


TAN 

Retorna a tangente de um angulo. 

Formato: 

TAN ( exprnm) 

Calcula a tangente de exprnm radianos. 
Nao disponfvel em Integer BASIC. 


USR 

Pula para uma sub-rotina em linguagem de maquina, passando os valores pelo Acumulador. 


Formato: 


US R exprnm 

A sub-rotina inicia na posiqao 10 (0A hexadecimal). As posiqoes 10 ate 12 (0A ate 0C em hexa¬ 
decimal) devem conter uma instrupao JMP em linguagem de maquina que salta para o enderego 
inicial da sub-rotina. Como USR e uma funqao, ela retorna um valor real. 0 que tiver no Acu¬ 
mulador quando for executada a instruqao RTS em linguagem de maquina (para retornar ao 
Applesoft) sera o valor retornado. 

Existem muitas sub-rotinas uteis em linguagem de maquina presente no Monitor do Apple II. 
Elas estao listadas no Apendice D. 

Veja tambem a declaragao CALL descrita na se<?ao sobre declaracoes neste capftulo, que 
tambem e disponfvel em Integer BASIC. 

Nao disponfvel em Integer BASIC. 


VAL 


VAL converte um cordao em um valor numerico. 
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Formato: 


VAL ( expr$) 

Retorna o valor numerico representado por expr$. Se o primeiro caractere de expr$ nao represen- 
ta um numero, zero e devolvido. De outro modo, expr$ e tornado, caractere por caractere, ate 
que um caractere nao aceitavel seja acessado. Os caracteres aceitaveis sao: os di'gitos de 0 a 9, 
espagos, o ponto decimal, os sinais de mais e menos, um outro ponto decimal e a letra E. 

Se expr$ e uma expressao envolvendo concatenagao e contem mais de 255 caracteres, a 
mensagem PSTRING TOO LONG ERROR ocorre. Se o valor numerico de expr$ exceder os 
limites de numeros reais, a mensagem POVERFLOW ERROR ocorre. 

Nao disponfvel em Integer BASIC. 


A 

Funcoes Numericas Derivadas 


Mesmo que a relagao de fungoes derivadas abaixo nao seja completa, ela fornece as formulas de 
uso mais frequente. Certos valores de x invalidam algumas fungoes (por exemplo, se COS(x) = 0 
entao SEC(x) nao 6 real), de forma que o programa deve fazer essas verificagoes. 

Nenhuma das fungoes derivadas operam em Integer BASIC. 

ARCCOS (x) = —ATN (x/SQR (—x *x + 1)) + 1.5707633 
Retorna o cosseno inverso de x (ABS(x) < 1). 

ARCCOT(x) = -ATN(x) + 1.5707633 
Retorna a cotangente inversa de x. 

ARCCOSH(x) = LOG(x + SQR(x *x — 1)) 

Retorna o cosseno hiperbolico inverso de x (x > = 1). 

ARCCOTH(x) = LOG((x + 1 )/(x — 1 ))/2 

Retorna a cotangente hiperbolica inversa de x (ABS(x >1). 

ARCCSC(x) = ATN(1 /SQR(x *x — 1)) + (SGN(x) - 1) * 1.5707633 
Retorna a cossecante inversa de x (ABS(x) > 1). 

ARCCSCH(x) = LOG((SGN(x) * SQR(x*x + 1) + 1)/x) 

Retorna a cossecante hiperbolica inversa de x (x > 0). 

ARCSEC(x) = ATN (SQR (x *x — 1)) + (SGN(x) - 1) * 1.5707633 
Retorna a secante inversa de x (ABS(x) > = 1). 

ARCSECH(x) = LOG((SQR(—x *x + 1) + 1)/x) 

Retorna a secante hiperbolica inversa de x (0 <x < = 1). 
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ARCSIN(x) = ATN(x/SQR(—x *x + 1)) 

Retorna o seno inverso de x (ABS(x) < 1). 

ARCSINH(x) = L0G(x + SQR(x*x + 1)) 

Retorna o seno hiperbolico inverso de x. 

ARCTANH(x) = LOG((1 + x)/( 1 -x))/2 

Retorna a tangente hiperbolica inversa de x (ABS(x) < 1). 

COSH(x) = (EXP(x) 4- EXP(—x))/2 

Retorna o cosseno hiperbolico de x. 

COT(x) = 1/TAN(x) 

Retorna a cotangente de x (x < > 0). 

COTH(x) = EXP(—x)/(EXP(x) - EXP(-x)) *2+1 

Retorna a cotangente hiperbdlica de x (x < > 0). 

CSC(x) = 1/SIN(x) 

Retorna a cossecante de x (x < > 0). 

CSCH(x) = 2/(EXP(x) - EXP(-x)) 

Retorna a cossecante hiperbolica de x (x < > 0). 

LOG a (x) = LOG(x)/LOG(a) 

Retorna o logaritmo de x na base a (a > 0, x > 0). 

LOG 10 (x) = LOG (x)/2.30258509 

Retorna o logaritmo comum (decimal) de x (x > 0). 

MODa(x) = INT((x/a - INT((x/a))*a + .05) * SGN(x/a) 

Retorna x modulo a: o resto da divisao de x por a (a < > 0). 

SEC(x) = 1/COS(x) 

Retorna a secante de x (x < > tt/2). 

SECH(x) = 2(EXP(x) + EXP(-x)) 

Retorna a secante hiperbolica de x. 

SINH(x) = (EXP(x) - EXP(—x))/2 

Retorna o seno hiperbdlico de x. 

TANH(x) = —EXP(—x)/EXP(x) + EXP(-x)) *2 + 1 
Retorna a tangente hiperbolica de x. 


B 

Comandos de Edicao 


Este apendice sumariza os comandos de edipao do teclado do Apple II. 


<- 

Rept 

Move o cursor para a frente ao longo da linha de edipao. Cada caractere passado 
e copiado para a memoria como se fosse digitado no teclado. Nao altera a tela. 

Move o cursor para tras ao longo da linha de edipao, limpando os caracteres 
pelos quais passa na memoria, porem deixando-os na tela. 

Causa a repetipao da tecla acionada por outra tecla enquanto ambas estao acio- 
nadas. A tecla Rept deve ser acionada apos a outra tecla. 

CTRL-X 

0 Apple II desconsidera a linha digitada e move o cursor para a prdxima linha, 
colocando-o na margem esquerda da mesma. 


Seqiiencias da Tecla ESC 

Os sete comandos de edipao que seguem sao seqiiencias de duas teclas. Em cada instancia, acione 
a tecla ESC, solte-a, e entao acione a segunda tecla da seqiiencia. 


ESC-A 

Move o cursor uma posipao para a direita. Nao altera a tela nem a memdria. 

ESC-B 

Move o cursor uma linha para a esquerda. Nao altera a tela nem a memoria. 

ESC-C 

Move o cursor uma linha para baixo. Nao altera a tela nem a memoria. 

ESC-D 

Move o cursor uma linha para cima. Nao altera a tela nem a memoria. 

ESC-E 

Limpa todos os caracteres a partir da posipao do cursor atd o fim da linha. 

ESC-F 

Limpa todos os caracteres da posipao do cursor at6 o fim da tela. 

ESC-(® 

Limpa a tela e move o cursor para o canto superior esquerdo. 
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Comandos em Modo de Edipao 

Os quatro comandos de edipao seguintes requerem o Monitor Autostart. Eles sao comandos que 
so operam no modo de edipao. Entre no modo de edipao acionando a tecla Esc e deixe o modo 
de edipao acionando qualquer tecla que nao seja I, J, K, M, Rept, CTRL ou SHIFT. 

I Move o cursor uma linha para cima sem sair da edipao. 

J Move o cursor uma posipao para a esquerda sem sair da edipao. 

K Move o cursor uma linha para a direita sem sair da edipao. 

M Move o cursor uma linha para baixo sem sair da edipao. 


c 

Mensagens de Erro 


As mensagens de erro sao agrupadas em tres categorias: Integer BASIC, Applesoft e DOS, e 
sao listadas alfabeticamente dentro de cada categoria. 

As mensagens de erro do DOS e muitas do Applesoft tern codigos de erro associados. Apos 
um erro ter causado um desvio com ONNER GOTO, o codigo para o erro pode ser obtido na 
posicao de memoria 222. A Tabela C-1, no final deste apendice, lista as mensagens de erro pelo 
numero de codigo. 


MENSAGENS DE ERRO DO INTEGER BASIC 


*** > 255 ERR 

0 valor que deveria estar entre 0 e 255 esta fora dessa faixa. 

*** > 32767 ERR 

Foi calculado ou digitado um numero maior que 32767 ou menor que —32767. 

*** 16 FORS ERR 

Foram ativados mais que 16 loops FOR. 

*** 16 GOSUBS ERR 

Foram executadas dezessete declaragoes GOSUB sem ter sido dado uma declaragao 
RETURN. 

*** BAD BRANCH ERR 

Tentou-se um salto para uma linha inexistente. 

*** BAD NEXT ERR 

Encontrou-se um NEXT sem ter sido dado um FOR anteriormente. 
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*** BAD RETURN ERR 

Executaram-se mais declarapoes RETURN que declarapoes GOSUB. 

***DIM ERR 

0 mesmo arranjo foi dimensionado mais de uma vez. 

*** MEM FULL ERR 

0 programa precisa de mais memdria do que existe disponfvel. 

*** NO END ERR 

A ultima instrupao dentro de urn programa nao 6 END. 

*** RANGE ERR 

Foi referenciado urn arranjo com subscrito menor que zero ou maior que o seu tamanho, 
ou urn argumento numa instrupao HLIN, VLIN, PLOT, TAB ou VTAB foi colocado fora 
da faixa prescrita. 

RETYPE LINE 

Provocou-se um erro em resposta a uma declarapao INPUT. A mensagem de diagndstico 
foi mostrada primeiro e depois esta diretiva. 

*** STRING ERR 

Foi detectada uma operapao ilegal com cordao. 

*** STR OVFL ERR 

Foram atribui'dos mais caracteres a um cordao do que ele pode aceitar. 

*** SYNTAX ERR 

Ocorreu um erro de digitapao, pontuapao ou sequencia ou outro erro qualquer que nao 
pode ser detectado por outra mensagem. 

*** TOO LONG ERR 

Foram aninhados mais de 12 parenteses ou mais de 128 caracteres dentro de uma linha. 


MENSAGENS DE ERRO DO APPLESOFT 

? BAD SUBSCRIPT ERROR 

Foi referenciado um arranjo com numero errado de subscritos ou com um ou mais subscri- 
tos excedentes em dimensao. Codigo de erro 107. 

? CANT CONTINUE ERROR 

Foi tentado continuar (com o comando CONT) quando nao existe o programa, ou quando 
ocorreu um erro fatal, ou foram feitas mudanpas no programa. 

? DIVISION BY ZERO ERROR 

Foi feita uma tentativa de dividir uma expressao por zero. Codigo de erro 133. 

? FORMULA TOO COMPLEX ERROR 

Foram executadas mais de duas declarapoes na forma IF cordao THEN. C6digo de erro 191. 
? ILLEGAL DIRECT ERROR 

Foi digitado um comando INPUT, DEF FN ou GET em modo imediato. 
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? ILLEGAL QUANTITY ERROR 

Um valor num^rico estS fora da faixa aceitavel para uma funpao com cordao, com valor 
num^rico, declarapao gr^fica etc. Codigo de erro 53. 

? NEXT WITHOUT FOR ERROR 

Foi executada uma funpao NEXT sem que antes tivesse sido dado o FOR correspondente. 
Um NEXT sem varidvel so gera erro se nao existir nenhum FOR em atividade. 

? OUT OF DATA ERROR 

Foi tentado ler mais dados com DATA do que existe dispom'vel. C6digo de erro 42. 

? OUT OF MEMORY ERROR 

Pode ser causado por: programa muito comprido, muitas variaveis, mais de 10 FOR aninha- 
dos, mais de 24 m'veis de sub-rotinas aninhadas, mais de 36 m'veis de parenteses aninhados, 
LOMEM: muito alto, ou HI MEM: muito baixo. Codigo de erro 77. 

? OVERFLOW ERROR 

Foi calculado ou entrado um numero muito grande ou muito pequeno. A faixa permitida 
6 aproximadamente —1.7E + 38 ate 1.7E +38. C6digo de erro 69. 

? REDIM'D ARRAY ERROR 

Foi achada uma declarapao DIM para um arranjo dimensionado. Ocorre mais frequente- 
mente quando um arranjo foi dimensionado por ausencia. Codigo de erro 120. 

? RETURN WITHOUT GOSUB ERROR 

Foram executadas mais declarapoes RETURN que GOSUB. C6digo de erro 22. 

? STRING TOO LONG ERROR 

Tentou-se concatenar cordoes com total de caracteres excedendo 255. C6digo de erro 176. 
? SYNTAX ERROR 

Um erro de digitapao, pontuapao ou sequencia, ou outro erro qualquer onde nao coube 
outra mensagem de erro. C6digo de erro 16. 

? TYPE MISMATCH ERROR 

Uma expressao numerica ou variavel foi usada onde deveria ser usado um cordao, ou vice- 
versa. Tamb^m ocorre quando os dois lados de uma igualdade nao sao do mesmo tipo. 
C6digo de erro 163. 

? UNDEF'D FUNCTION ERROR 

Foi referenciada uma funpao definida por usu2rio que nao foi definida. C6digo de erro 224. 
? UNDEF'D STATEMENT ERROR 

Foi tentado um salto para uma linha de programa inexistente. C6digo de erro 90. 


MENSAGENS DE ERRO DO DOS 


DISK FULL 

Foi feita uma tentativa de colocar mais informapao num disco do que ele pode suportar. 
Num disco cheio, esta mensagem pode ocorrer no lugar da informapao de uma mensagem 
mais apropriada (ex. FILE NOT FOUND). Codigo de erro 9. 
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TABELA C.l. Codigos da Erro. 


PEEK (2221 

Descripao do Erro 

Linguagem 

0 

NEXT sem FOR 

Applesoft 

1 

Linguagem nao dispom'vel 

DOS 

2 ou 3 

Erro de faixa 

DOS 

4 

Protegido contra escrita 

DOS 

5 

Fim de dados 

DOS 

6 

Arquivo nao encontrado 

DOS 

7 

Volume nao coincidente 

DOS 

8 

Erro de E/S 

DOS 

9 

Disco cheio 

DOS 

10 

Arquivo travado 

DOS 

11 

Erro de sintaxe 

DOS 

12 

Nao ha buffers dispom'veis 

DOS 

13 

Tipo de arquivo nao coincidente 

DOS 

14 

Programa muito comprido 

DOS 

15 

Comando nao direto 

DOS 

16 

Erro de sintaxe 

Applesoft 

22 

RETURN sem GOSUB 

Applesoft 

42 

Fora de DATA 

Applesoft 

53 

Quantidade ilegal 

Applesoft 

69 

Estouro 

Applesoft 

77 

Fora da memoria 

Applesoft 

90 

Declaragao nao definida 

Applesoft 

107 

Subscrito errado 

Applesoft 

120 

Arranjo redimensionado 

Applesoft 

133 

Divisao por zero 

Applesoft 

163 

Tipo nao coincidente 

Applesoft 

176 

Cordao muito longo 

Applesoft 

191 

Formula muito complexa 

Applesoft 

224 

Funpao nao definida 

Applesoft 

254 

Resposta errada a INPUT 

Applesoft 

255 

Ctrl-C foi acionado 

Applesoft 


END OF DATA 

Foi feita uma tentativa de ler uma parte de um arquivo de texto que nunca foi gravado. 
Codigo de erro 5. 

FILE LOCKED 

Foi feita uma tentativa de usar SAVE, BSAVE, WRITE, DELETE ou RENAME num 
arquivo travado. Cddigo de erro 10. 
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FILE NOT FOUND 

Fez-se referenda a um arquivo inexistente no disco. Este erro so ocorre se o comando DOS 
que referenciou o arquivo nao o criou no momento em que ele nao foi achado. Codigo 
de erro 6. 

FILE TYPE MISMATCH 

Um comando DOS referenciou um arquivo que nao e do tipo requerido. Os comandos 
LOAD, RUN e SAVE so podem ser usados com arquivos de programas. 0 comando CHAIN 
so pode ser usado com arquivos de programa em Integer BASIC. Os comandos OPEN, 
READ, WRITE, APPEND, POSITION e EXEC so podem ser usados com arquivos de texto. 
Os comandos BLOAD, BSAVE e BRUN so podem ser usados com arquivos binarios. 
Codigo de erro 13. 

I/O ERROR 

Tentou-se insatisfatoriamente guardar ou obter informa<?ao de um disco. Algumas causas 
podem ser: a porta do drive esta aberta, o disco nao foi inicializado, nao ha disco no drive, 
ou o disco esta com defeito. Codigo de erro 8. 

LANGUAGE NOT AVAILABLE 

Tentou-se trocar de linguagem com FP ou INT sem a linguagem desejada estar presente no 
disco ou na ROM, ou foi feita uma tentativa de carregar ou rodar um programa quando 
a linguagem do programa nao era dispom'vel. C6digo de erro 1. 

NO BUFFERS AVAILABLE 

Foi requerido um outro buffer quando todos os buffers dispom'veis ja estavam em uso. 
Codigo de erro 12. 

NOT DIRECT COMMAND 

Os comandos DOS seguintes so podem ser usados com o uso de declaragao PRINT em 
modo programado: APPEND, OPEN, POSITION, READ e WRITE. Codigo de erro 15. 

PROGRAM TOO LARGE 

Um comando DOS tentou ler um arquivo do disco na memoria do Apple II, e nao achou 
memdria suficiente para coloca-lo. Codigo de erro 14. 

RANGE ERROR 

Um parametro usado num comando DOS esta fora da sua faixa especificada; por exemplo, 
o parametro D (drive) deve ser 1 ou 2. Codigo de erro 2 ou 3. 

SYNTAX ERROR 

Um comando DOS tern um erro de digitapao, pontua<?ao ou sequencia. Codigo de erro 11. 
VOLUME MISMATCH 

0 parametro V (volume) num comando DOS nao coincidiu com o parametro volume do 
disco acessado. Codigo de erro 7. 

WRITE PROTECTED 

Tentou-se usar SAVE, BSAVE ou WRITE com um arquivo protegido do disco. Codigo de 
erro 4. 


D 

Sub-rotinas Intrmsecas 


As duas tabelas seguintes listam algumas sub-rotinas em linguagem de maquina dispom'veis no 
Apple II sub-rotina. Ache o ponto de entrada listado na Tabela D.1 na primeira coluna da Tabela 
D.2 para detalhes sobre registradores afetados etc. 

A Tabela D.2 lista as sub-rotinas por ordem de ponto de entrada. A terceira coluna mostra 
os registradores (se existirem) que deve conter valores especi'ficos antes que a sub-rotina seja 
acessada. A quarta coluna mostra quais registradores sao afetados na execupao da sub-rotina. 

Muitas destas sub-rotinas tem equivalentes em comandos BASIC, ou podem ser acessadas 
a partir do BASIC com uma unica instrupao CALL. Essas equivalences aparecem na Tabela D.2. 
Alguns dos comandos BASIC listados sao dispom'veis apenas em Applesoft; eles sao sinalizados 
com urn A. 

Algumas sub-rotinas, entretanto, nao tem equivalences em nenhuma versao do BASIC, e 
nao podem ser executadas por um CALL porque urn ou mais registradores devem ser carregados 
com valores especi'ficos antes de sua execupao. Sao requeridas tecnicas diferentes para lidar com 
esse problema, de acordo com a versao do BASIC. 

0 Integer BASIC fornece uma solupao mais simples. Primeiro execute um CALL —182 para 
colocar os valores correntes dos registradores na memoria RAM. Entao de um POKE nos valores 
desejados nas posipoes de memoria 69 para o registrador A, 70 para o registrador X e 71 para o 
registrador Y. Execute um CALL —193 para colocar esses valores nos registradores, e de um 
CALL para a rotina que sera executada em primeiro lugar. 

Esta tecnica nao funciona em Applesoft. Deve-se, entao escrever e executar uma sub-rotina 
em linguagem de maquina que carregue os registradores com os valores desejados e entao execute 
um salto para o ponto de entrada da rotina desejada, em linguagem de maquina. 
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TABELA D.l. Referenda a Sub-rotinas Intri'nsecas por Funpao. 



Funpao 

Ponto de Entrada 


Desenha um ponto grafico em baixa resolupao 

$F800 


Desenha uma linha horizontal em grafico de baixa 
resolupao 

$F819 


Desenha uma linha vertical em baixa resolupao 

$F828 


Coloca todas as 48 linhas graficas de baixa resolupao 
em preto (se em modo texto, coloca invertido) 

$F832 

Graficos 

Coloca as 40 linhas de cima de grafico de baixa 

$F836 

de Baixa 

resolupao em preto (ou inverso) 


Resolupao 

Incrementa a cor do grafico de baixa resolupao atual 
em tres 

$F85F 


Determina a cor do grafico em baixa resolupao 

SF864 


Le a cor de um ponto grafico de baixa resolupao 

$F871 


Entra no modo grafico de baixa resolupao, limpa a 
tela e deixa as quatro linhas de baixo para janela 
de texto 

$FB40 


Espera por acionamento de tecla com o cursor pis- 
cando, e cria o gerador de numeros aleatorios nas 
posipoes $4E e $4F 

$FD1B 

Entrada 

0 mesmo que acima a excepao que os codigos de 
escape tambem sao permitidos 

$FD35 


Manda carriage return para a tela, e permite entrada 
de uma linha inteira de ate 256 caracteres 

$FD67 


Manda tres brancos para o dispositivo selecionado 

corrente 

$F948 


Manda de 1 a 256 brancos para o dispositivo selecio¬ 
nado corrente 

$F94A 

Sai'da 

Manda um carriage return e um line feed para a tela 
do Apple 11 

$FC62 


Manda um caractere para o dispositivo selecionado 

corrente 

$FDED 


Manda um caractere para a janela de texto 

$FDF0 


Manda o caractere de sino (codigo ASCII 07) para o 

$FBD9 

Safda 

de Sino 

dispositivo selecionado corrente 


Apita no falante interno por 1/10 segundo 

$FBE4 

Manda a mensagem ERR e apita o falante interno 

$FF2D 


Apita o falante interno 

$FF3A 
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TABELA D.l. (continuapao) 



Funpao 

Ponto de Entrada 

Janela de 

Poe a tela do Apple II com 24 linhas e 40 colunas 

$FB2F 

Texto 

Pula uma linha na janela de texto 

$FC70 


Manda um caractere backspace para a tela, atuali- 

$FC10 


zando a posigao do cursor 


Controle 

Move o cursor uma linha para cima. Se o cursor ja 

$FC1 A 

de 

estiver em cima, ele nao se movera 


Cursor 

Move o cursor uma linha abaixo sem trocar sua po- 

$FC66 


sigao horizontal. Toda a tela salta uma linha se o 
cursor ja estiver na de baixo 



Limpa a janela de texto a partir de sua posi<pao atual 

$FC42 


ate o canto inferior direito da tela 



Limpa a janela de texto das coordenadas passadas no 

$FC46 

Limpeza 

registrador ate o canto inferior direito da tela 


da Tela 

Limpa toda a tela e move o cursor para o canto supe¬ 

$FC58 


rior esquerdo 

Limpa a linha atual da posi<?ao do cursor ate o fim 

$FC9C 


da linha 


Modo 

Coloca a tela em vfdeo inverso (preto-sobre-branco) 

SFE80 

Vfdeo 

Coloca a tela em vfdeo normal (branco-sobre-preto) 

SFE84 


Imprime o conteudo dos registradores Y e X (no for- 

SF940 

Impressao 

tJg 

mato YYXX) no dispositivo selecionado corrente 
Imprime o conteudo dos registradores A e X (no for- 

$F941 

Conteudo 

de 

mato AAXX) no dispositivo selecionado corrente 
Imprime o conteudo do registrador X no dispositivo 

$F944 

Registradores 

selecionado corrente 

Imprime o conteudo do registrador A no dispositivo 

$FDDA 


selecionado corrente 


Move 

Recoloca o conteudo dos registradores (valido apenas 

$FF3F 

Conteudos 

de 

Registradores 

se a rotina intrfnseca em $FF4A foi executada pre- 
viamente) 


Salva os conteudos dos registradores nas posigoes 
reservadas da pagina Zero 

$FF4A 


Le o estado de um controlador de jogo (paddle) 

$FB1E 


Executa um loop de atraso 

$FCA8 

Diversos 

Retorna para o BASIC, eliminando o programa e 

$FEB0 


as variaveis da memoria 



Ponto de entrada do Monitor 

$FF69 
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TABELA D.2. Sub-rotinas Intrmsecas por Ponto de Entrada 


Ponto 

de 

Entrada 

Uso 

Registradores a 
Serem Carregados 
Antes da Chamada 

Registradores 

Afetados 

Equivalentes 

BASIC 

$F800 

Desenha um ponto na 
pbgina grbfica de baixa 
resolugao 1 

Coloque linha em 

A e coluna em Y 

Nenhum 

PLOT 

$F819 

Desenha uma linha 

horizontal em baixa 
resolugao 

Linha em A, coluna 
em Y, coluna da 
direita na posigao 
de membria 44 

A, Y 

HLIN 

$F828 

Desenha uma linha vertical 
em baixa resolugao 

Coluna em Y, linha 
em A, linha mais 
baixa na posigao 
de membria 45 

Nenhum 

VLIN 

$F832 

Coloca todas as 48 linhas 
graficas de baixa resolugao 
em preto (se estiver no 
modo texto, enche de 
caracteres "@") 

Nenhum 

A, Y 

CALL-1998 

$F836 

Limpa as linhas graficas de 
baixa resolugao, deixando 
a janela de texto intacta 

Nenhum 

A, Y 

GR 

(veja $FB40) 

$F85F 

Incrementa a cor do grbfico 
de baixa resolugao atual 
em trbs 

Nenhum 

A 

CALL-1953 

$F864 

Determina a cor grbfica de 
baixa resolugao 

Numbro da cor em A 

A 

COLOR 

$F871 

Le a cor de um ponto 
grbfico de baixa resolugao 

Linha em A, coluna 
em Y 

A (contbm numero 
da cor) 

SCRN 

$F940 

Imprime os conteudos dos 
registradores Y e X (no 
formato YYXX) na tela 
ou em outro dispositivo 
selecionado 

Nenhum 

Nenhum 

CALL-1728 

$F941 

Imprime os registradores 
(AAXX) como acima 

Nenhum 

Nenhum 

CALL-1727 

$F944 

Imprime o conteudo do 
registrador X 

Nenhum 

Nenhum 

CALL-1724 

$F948 

Manda tres brancos para o 
dispositivo selecionado 
corrente (determinado 
pelo conteudo de CSW) 

Nenhum 

Nenhum 

CALL-1720 

$F94A 

Manda de 1 a 256 caracteres 
brancos para o dispositivo 
selecionado corrente 

Numero de espagos 
em branco em A 
(carregando 0 
imprime 256 
caracteres) 

Nenhum 

SPC ( ) A 
CALL-1718 

$FB1 E 

Le o estado do paddle 

0, 1,2ou 3 

Numero do paddle 
em X 

0 a FF no registrador 
Y, e contebdo de A 
destrui'do 

PDL( ) 
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TABELA D.2. (continuagao) 


Ponto 

de 

Entrada 

Uso 

Registradores a 
Serem Carregados 
Antes da Chamada 

Registradores 

Afetados 

Equivalentes 

BASIC 

$FB2F 

Formada a tela do Apple 11 
para 40 linhas de 

24 colunas 

Nenhum 

A 

TEXT 

$FB40 

Formada a tela para grafico 
de baixa resolugao, limpa 
a tela e coloca 4 linhas 
para janela de texto 

Nenhum 

A, Y 

GR 

SFBD9 

Manda o caractere BELL 
(cddigo ASCII 07) para o 
dispositivo selecionado 
corrente 

Nenhum 

A, Y 

CALL-1063 

$FBE4 

Apita o falante do Apple II 
por 1 /10 segundo 

Nenhum 

A, Y 

CALL-1052 

$FC10 

Manda um caractere 
backspace para a tela, 
atualizando a posigao do 

cursor 

Nenhum 

A 

CALL-1008 

$FC1 A 

Move o cursor uma linha 
para cima. Se ele jci estiver 
na linha superior, nada 

acontece 

Nenhum 

A 

CALL-998 

$FC42 

Limpa a janela de texto 
da posigao atual do cursor 
at6 o canto inferior 

direto da tela 

Nenhum 

A. Y 

CALL-958 

SFC46 

Limpa a janela de texto a 
partir das coordenadas 
passadas nos registradores 
at6 o canto inferior direito 

Coluna em Y, linha 
em A 

A, Y 

CALL-954 

$FC58 

Limpa toda a tela de texto 
e move o cursor para o 
canto superior esquerdo 

Nenhum 

A, Y 

HOME 4 

CALL-936 

SFC62 

Manda um carriage return 
e um line feed para a tela 
do Apple II 

Nenhum 


CALL-926 

$FC66 

Move o cursor uma linha 
para baixo sem alterar sua 
posigao horizontal. Pula 
toda a tela uma linha para 
cima se estiver na linha de 

baixo 

Nenhum 

A, Y 

CALL-922 

$FC70 

Pula toda a tela uma linha 
para cima 

Nenhum 

A, Y 

CALL-912 

$FC9C 

Limpa o texto a partir da 
posigao atual do cursor 
at6 o fim da linha. A 
posigao do cursor 
permanece inalterada 

Nenhum 

A, Y 

CALL-868 








TABELA D.2. (continuagao) 


Ponto 

de 

Entrada 

Uso 

Registradores a 
Serem Carregados 
Antes da Chamada 

Registradores 

Afetados 

Equivalentes 

BASIC 

$FCA8 

Executa um loop de retardo 
que tem 

0.5 (5x2 + 27x + 26) 
de durapao 

Valor do atraso x 

em A 

A 

CALL-856 

$FDOC 

Espera por acionamento de 
uma tecla. Gera semente 

de numero aleatbrio nas 
posipoes de membria 78 
e 79 

Nenhum 

Caractere retorna 

em A. 

Xe Y 

CALL-756 

$FD35 

Como $FDOC, exceto que 
o codigo escape nao 6 
permitido 

Nenhum 

Caractere retorna 

em A 

X e Y 

CALL-715 

$FD67 

Manda carriage return para 
a tela; permite entrada 
de uma linha inteira de 
dados, atb 256 caracteres 

Caractere de entrada 
na posipao 51 

Y, A 

X contbm o tamanho 

da entrada. Os dados 

entrados iniciam na 
posipSo $200 

INPUT 

$FDDA 

Imprime o valor do 
Acumulador como dois 
di'gitos hexadecimais 

Dado em A 

A 

CALL-550 

$FDED 

Manda um caractere para 
o dispositivo selecionado 

corrente 

Caractere em A 

Nenhum 

PRINT 

$FDFO 

Manda um caractere para 
a janela de texto do 

Apple II 

Caractere em A 

Nenhum 

PRINT 

$FE80 

Coloca o vfdeo em modo 
reverso (texto preto- 
sobre-branco) 

Nenhum 

Y 

INVERSE^ 

CALL-384 

$FE84 

Coloca o vfdeo em modo 
normal (texto branco- 
sobre-preto) 

Nenhum 

Y 

NORMAL^ 
CALL-380 

$FEBO 

Retorna ao BASIC, 
eliminando o programa 
e as varibveis da 

membria 

Nenhum 

A, X, Y 

CALL-336 

$FF2D 

Imprime a mensagem ERR 
e apita o falante interno 

Nenhum 

A 

CALL-211 

$FF3A 

Apita o falante interno 

Nenhum 

A 

CALL-198 

$FF3F 

Recupera o conteudo dos 
registradores (sd valido se 
a sub-rotina intrfnseca de 
$FF4A foi executada 
previa mente) 

Nenhum 

0 conteudo dos 
registradores 6 tirado 
das seguintes posi¬ 
poes: registrador A: 
69($45), registrador 
S: 72($48), registra¬ 
dor X: 70($46), 
Apontador de Pilha: 
73($49), registrador 
Y: 71 ($47) 

CALL-193 
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TABELA D.2. (continuagao) 


Ponto 

de 

Entrada 

Uso 

Registradores a 
Serem Carregados 
Antes da Chamada 

Registradores 

Afetados 

Equivalentes 

BASIC 

$FF4A 

Salva os conteudos dos 

Nenhum 

Nenhum 

CALL-182 


registradores nas posigoes 
da Pdgina reservada 0: 
registrador A: 69($45), 
registrador S: 72($48), 
registrador X: 70($46), 
Apontador de Pilha: 
73($49), 

registrador Y: 71 ($47) 




$FF69 

Ponto de entrada do 

Nenhum 

Nenhum 

CALL-151 


Monitor 




A 

denota comandos dispom'veis apenas em Applesoft. 









Posicoes Uteis de Peek e Poke 


Cada uma das posicoes e memoria listadas abaixo e expressa em termos de um numero decimal 
menor que 32767 em modulo. As posicoes de memoria cima de 32767 sao expressas em termos de 
um numero negativo. Existe um numero positivo que se refere a mesma posipao de memoria. Some 
65536 ao numero listado para obter o positivo equivalente (exemplo, 65535 — 16384 = 49152). 

Algumas das funpoes descritas abaixo sao atuadas com o seu acesso. Quer dizer que a qualquer 
momento em que um PEEK acessar uma posipao especffica de memoria, a operapao especificada 
tern infcio. Um POKE para a posipao especffica de memoria tambem dispara a apao, mas devido a 
caracterfsticas do microprocessador do Apple II, uma declarapao POKE na verdade dispara a apao 
por duas vezes. Neste caso, POKE equivale a duas declarapoes PEEK. Normalmente isso nao faz 
diferenpa, mas em casos como —16336 (apita o alto-falante) faz. 0 valor colocado na memoria 
pelo POKE e irrelevante nestas atuapoes sobre enderepos. 


JANELAS DE TEXTO E POSIQOES DE CONTROLE DE CURSOR 

32 Margem Esquerda da Janela de Texto 

Especifica a coluna da margem esquerda da janela de texto. Um PEEK retorna um valor 
entre 0 e 39, como sendo o lado esquerdo da tela. A troca dessa posipao nao afeta a lar- 
gura da janela; ambas as margens, esquerda e direita, se movem. 

Usando um valor maior que 39 no POKE, ou se o valor da posipao mais a largura da 
janela de texto exceder 40, alguns ou mesmo todos os dados mandados para a tela serao 
colocados fora de sua area de memoria. Isso pode destruir o programa ou mesmo algum 
dado essencial. 

33 Largura da Janela de Texto 

Especifica a largura da janela de texto. 0 valor desta posipao deve estar entre 1 e 40. A 
troca desse valor muda a margem direita para a coluna especificada, onde estS especifi- 
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cado o numero de caracteres especificado a frente da margem esquerda (posipao de 
memoria 32). 

Um valor zero nesta posipao (ou seja, largura zero) pode destruir o interpretador 
BASIC. Colocando-se um valor maior que 40 nesta posipao com POKE, ou se o valor 
deste local mais a posipao 32 (margem esquerda) exceder 40, algum ou todo o dado man- 
dado para a tela caira fora de sua area de memoria. Isso podera destruir o programa ou 
dados importantes. 

34 Margem Superior da Janela de Texto 

Especifica a margem superior da janela de texto. 0 valor desta posipao deve estar na faixa 
de 0 ate 23; 0 especifica a linha superior da tela, 23 a inferior. Colocando-se um valor 
maior que 23 nessa posipao com POKE, algum ou todo o dado mandado para a tela ir3 
para areas de memoria fora da area de tela, mexendo com outros dados que podem ser 
importantes. Nao coloque a margem superior do texto abaixo da margem inferior. 

35 Margem Inferior da Janela de Texto 

Especifica a margem inferior da janela de texto. 0 valor desta posipao deve estar na faixa 
entre 0 e 23; 0 especifica a linha superior da tela e 23 a inferior. Colocando um valor 
maior que 23 nessa posipao, algum ou todo o dado mandado para a tela poderS cair fora 
da area de memoria de vfdeo, alterando dados que podem ser importantes. Nao coloque a 
margem inferior da janela de texto acima da margem superior. 

36 Posipao Horizontal do Cursor 

Especifica a posipao horizontal corrente do cursor. Um PEEK retorna um valor entre 0 e 
39 que especifica a posipao do cursor em relapao a margem esquerda da janela de texto 
(nao necessariamente a margem esquerda da tela). Esta posipao pode ser usada para posi- 
cionar alem da margem direita (e depois imprimi-la com PRINT), mas o cursor fica la 
apenas o necessario para imprimir um caractere. Nao coloque um valor nesta posipao que 
somado ao da margem esquerda da tela (posipao 32) exceda 39. 

Este PEEK e equivalente a funpao POS do Applesoft. 

37 Posipao Vertical do Cursor 

Especifica a posipao vertical corrente do cursor. Um PEEK retorna um valor entre 0 e 23, 
em relapao a linha superior da tela (nao em relapao a linha superior da janela de texto). 
Nao coloque um valor maior que 23 nesta posipao. 


POSigOES DE TRATAMENTO DE ERRO 

216 Indicapao de Erro 

Indica quando um ONNER GOTO esta atuando. Se o bit 7 desta posipao de memoria e 1 
(ou seja, se a posipao tern um valor 128 ou mais), uma declarapao ONNER GOTO foi encon- 
trada, e o controle passarS para a linha de numero especificado no caso de erro. Coloque um 
valor menor que 128 na posipao com POKE para inibir a operacao de ONNER GOTO. 

218 e 219 Numero de Linha Acessada por Erro 

Quando um erro provoca um salto de acordo com uma declarapao ONNER GOTO, essas 
posipoes especificam o numero da linha na qual o erro ocorreu. Este numero de linha e 
PEEK(219) * 256 + PEEK(218). 
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222 Codigo de Tipo de Erro 

Especifica que tipo de erro ocorreu. Os codigos de erro e suas especificapoes sao dados no 
Apendice C. 


POSIQOES DE TECLADO 

— 16384 Caractere do Teclado 

Le o teclado. Se o valor desta posipao e maior que 127 (ou seja, se o bit 7 esta em 1), uma 
tecla foi acionada. Determine o codigo ASCII equivalente subtraindo 128 desse valor. 

— 13368 Indicapao de Teclado 

Desliga o inibidor de teclado (bit 7 da posipao — 16384), colocando-o em zero de forma que 
o proximo caractere possa ser lido. 


POSIQ0ES DE SAfDA DE "CLICK" 

— 16352 Click do cassette 

Gera urn click auditivo no conector do cassette. 

— 16336 Click do falante 

Gera um click no alto-falante interno. 


CHAVES DE DISPLAY 

As posicoes de memoria listadas nesta sepao ativam certas chaves que determinam as caracterfsticas 
de display. Elas nao sao chaves reais; apenas os comandos PEEK e POKE afetam essas posicoes. 



FIGURA E.1. Posipoes de Texto e Graficos para PEEK e POKE. 
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Existem quatro chaves, e cada uma delas pode ser colocada em duas posipoes diferentes, como 
mostrado na Figura E.l. Como modo texto selecionado, a unica chave que tem efeito e a de 
Pagina 1/Pagina 2. 

— 16304 Selepao de Modo GrSfico 

Seleciona o modo grafico. A tela grafica nao e colocada em preto. 0 modo grafico pode ser 
de alta ou baixa resolupao, pagina 1 ou 2, grafico de tela cheia ou misto de grafico e texto. 
Essas caracterfsticas sao determinadas por outras posipoes de memoria. 

— 16303 Selepao de Modo Texto 

Seleciona modo texto. 0 texto pode ser na pagina 1 ou 2, o que e determinado por outras 
posipoes de memoria. 

— 16302 Seleciona Graficos em Tela Cheia 

Seleciona graficos em tela cheia. Se a tela estiver em modo texto, isto nao sera visfvel ate que 
a posipao — 16304 seja acessada. 

— 16301 Seleciona Graficos mais Texto 

Determina quatro linhas para janela de texto na parte de baixo da tela. Se a tela estiver no 
modo texto, isto nao sera visfvel ate que a posipao — 16304 seja acessada. 

— 16300 Seleciona Pdgina de Tela 1 

Seleciona pagina 1 de graficos ou texto. 

— 16299 Seleciona Pagina de Tela 2 

Seleciona pagina 2 de graficos ou texto. 

— 16298 Seleciona Graficos em Baixa Resolupao 

Seleciona graficos em baixa resolupao. Se a tela estiver em modo texto, isto nao ser3 visfvel 
ate que a posipao — 16304 seja acessada. 

— 16297 Seleciona GrSficos em Alta Resolupao 

Seleciona graficos em alta resolupao. Se a tela estiver em modo texto, isto nao sera visfvel 
ate que acesse a posipao - 16304. 


posiqOes de controle de JOGOS 

As posipoes de memoria nesta sepao ligam e desligam os controles de safda de jogos, sentem se 
um botao foi acionado ou nao, e atuam um liberador de safda. A Figura E.2 mostra como as 
safdas dos controladores de jogos sao manipuladas. 

Todas as entradas e safdas para estas declaracoes PEEK e POKE ligadas ao conector de con¬ 
trole de jogos sao mostradas na Figura E.3. 

— 16296 Anunciador 0 Desligado 

Desliga a safda do controlador de jogo (anunciador) numero 0. A tensao no pino 15 do 
conector do controlador e colocada em aproximadamente 0 volts (nfvel TTL alto). 

— 16295 Anunciador 0 Ligado 

Liga a safda do controlador de jogo (anunciador) numero 0. A tensao do pino 15 do conec¬ 
tor do controlador e colocada em aproximadamente +5 volts (nfvel TTL baixo). 
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Ligado Ligado Ligado Ligado 

-16295 -16293 -16291 -16289 



Anunciador 0 Anunciador 1 Anunciador 2 Anunciador 3 


FIGURA E.2. Manipulapao de Sai'das de Controlador de Jogo (Anunciadores). 



FIGURA E.3. Entradas e Sai'das do Controlador de Jogo. 


16294 Anunciador 1 Desligado 

Desliga a safda do controlador de jogo (anunciador) numero 1. A tensao no pino 15 do 
conector do controlador e colocada em aproximadamente 0 volts (nfvel TTL alto). 

16293 Anunciador 1 Ligado 

Liga a safda do controlador de jogo (anunciador) numero 1. A tensao no pino 15 do conec¬ 
tor do controlador e colocada em aproximadamente + 5 volts (nfvel TTL baixo). 

16292 Anunciador 2 Desligado 

Desliga a safda do controlador de jogo (anunciador) numero 2. A tensao no pino 15 do 
conector do controlador e colocada em aproximadamente 0 volts (nfvel TTL alto). 
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— 16291 Anunciador 2 Ligado 

Liga a safda do controlador de jogo (anunciador) numero 2. A tensao no pino 15 do conec- 
tor do controlador e colocada em aproximadamente +5 volts (nfvel TTL baixo). 

— 16290 Anunciador 3 Desligado 

Desliga a safda do controlador de jogo (anunciador) numero 3. A tensao no pino 15 do 
conector do controlador e colocada em aproximadamente 0 volts (nfvel TTL alto). 

— 16289 Anunciador 3 Ligado 

Liga a safda do controlador de jogo (anunciador) numero 3. A tensao no pino 15 do conec¬ 
tor do controlador e colocada em aproximadamente + 5 volts (nfvel TTL baixo). 

— 16287 Ler Botao 0 

Quando o botao do controlador de jogo numero 0 e acionado, o valor desta posigao excede 
127; quando nao e acionado, o valor e 127 ou menos. 0 botao 0 e conectado ao pino 2 do 
conector do controlador de jogo. 

— 16286 Ler Botao 1 

Quando o botao do controlador de jogo numero 1 e acionado, o valor desta posigao excede 
127; quando nao e acionado, o valor e 127 ou menos. 0 botao 1 e conectado ao pino 3 do 
conector do controlador de jogo. 

— 16285 Ler Botao 2 

Quando o botao do controlador de jogo numero 2 e acionado, o valor desta posigao excede 
127; quando nao e acionado, o valor e 127 ou menos. 0 botao 2 e conectado ao pino 4 do 
conector do controlador de jogo. 

— 16272 Liberador de Safda 

Normalmente o pino 5 do conector do controlador de jogo esta em +5 volts. Se for dado 
urn PEEK na posigao de memoria — 16285, ele pula para 0 volts por um e meio micros- 
segundo. Um POKE aciona o liberador por duas vezes. 


F 

Palavras Reservadas do Basic 


0 Apple II interprets toda ocorrencia das seguintes palavras reservadas como comandos, declara- 
goes ou fundoes do BASIC. A unica excegao e quando elas sao parte de um cordao de texto entre 
aspas. Nao use estas palavras reservadas como variciveis. Cuidado principalmente com as palavras 
reservadas pequenas. 

Pode-se digitar as palavras intervaladas de espa<?os; o Apple II os despreza. 


INTEGER BASIC 


ABS 

END 

LET 

PDL 

SAVE 

AND 

FOR 

LIST 

PEEK 

SCRN 

ASC 

GOSUB 

LOAD 

PLOT 

SGN 

AT 

GOTO 

LOMEM: 

POKE 

STEP 

AUTO 

GR 

MAN 

POP 

TAB 

CALL 

HIMEM: 

MOD 

PRINT 

TEXT 

COLOR = 

HLIN 

NEW 

PR# 

THEN 

CON 

IF 

NEXT 

REM 

TO 

DEL 

IN# 

NOT 

RETURN 

TRACE 

DIM 

INPUT 

NOTRACE 

RND 

VLIN 

DSP 

LEN 

OR 

RUN 

VTAB 


APPLESOFT 

As palavras reservadas em Applesoft sao codificadas; cada palavra usa apenas um byte de armazena- 
mento do programs. Os codigos sao listados em conjunto com suas palavras reservadas. Eles tam- 
bem sao listados na ordem num^rica no Apendice I. 
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0 Applesoft nao reconhece de acordo a palavra reservada TO se:. 

1. 0 primeiro caractere diferente de branco antes do TO seja a letra A, e 

2. Um ou mais brancos separem o T do 0. 


ABS 

(212) 

HTAB 

(150) 

REM 

(178) 

AND 

(205) 

IF 

(173) 

RESTORE 

(174) 

ASC 

(230) 

IN# 

(139) 

RESUME 

(166) 

AT 

(197) 

INPUT 

(132) 

RETURN 

(177) 

ATN 

(225) 

INT 

(211) 

RIGHTS 

(233) 

CALL 

(140) 

INVERSE 

(158) 

RND 

(219) 

CHR$ 

(231) 

LEFTS 

(232) 

ROT = 

(152) 

CLEAR 

(189) 

LEN 

(227) 

RUN 

(172) 

COLOR = 

(160) 

LET 

(170) 

SAVE 

(183) 

CONT 

(187) 

LIST 

(188) 

SCALE= 

(153) 

COS 

(222) 

LOAD 

(182) 

SCRN( 

(215) 

DATA 

(131) 

LOG 

(220) 

SGN 

(210) 

DEF 

(184) 

LOMEM: 

(164) 

SHLOAD 

(154) 

DEL 

(133) 

MID$ 

(234) 

SIN 

(223) 

DIM 

(134) 

NEW 

(191) 

SPC( 

(195) 

END 

(128) 

NEXT 

(130) 

SPEED= 

(169) 

EXP 

(221) 

NORMAL 

(157) 

SQR 

(218) 

FLASH 

(159) 

NOT 

(198) 

STEP 

(199) 

FN 

(194) 

NOTRACE 

(156) 

STOP 

(179) 

FOR 

(129) 

ON 

(180) 

STORE 

(168) 

FRE 

(214) 

ONERR 

(165) 

STRS 

(228) 

GET 

(190) 

OR 

(206) 

TAB( 

(192) 

GOSUB 

(176) 

PDL 

(216) 

TAN 

(224) 

GOTO 

(171) 

PEEK 

(226) 

TEXT 

(137) 

GR 

(136) 

PLOT 

(141) 

THEN 

(196) 

HCOLOR = 

(146) 

POKE 

(185) 

TO 

(193) 

HGR 

(145) 

POP 

(161) 

TRACE 

(155) 

HGR2 

(144) 

POS 

(217) 

USR 

(213) 

HIMEM: 

(163) 

PRINT 

(186) 

VAL 

(229) 

HLIN 

(142) 

PR# 

(138) 

VLIN 

(143) 

HOME 

(151) 

READ 

(135) 

VTAB 

(162) 

HPLOT 

(147) 

RECALL 

(167) 

WAIT 

(181) 





XDRAW 

(149) 


DOS 

Os comandos do DOS so sao considerados como palavras reservadas se usados em modo imediato 
ou numa declaragao PRINT que inicie com o caractere Ctrl-D (codigo ASCII 04). 
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G 

Uso da Memoria 


organizaqAo geral da memOria 

A memoria do Apple II e dividida em tres categorias gerais: memoria de leitura e gravagao (tam- 
bem chamada de memoria de acesso aleatorio ou RAM), memoria apenas de leitura (ROM) e posi¬ 
goes de entrada/sai'da (E/S). As posigoes de memoria de 0 a 49151 ($BFFF hexadecimal) sao de 
RAM, as posigoes de 49152 ($C000) a 53247 ($CFFF) sao em ROM. Seu sistema nao precisa 
necessariamente ter todas essas posigoes. Por exemplo, tendo apenas 16K de RAM, as 
posigoes de 16384 ($4000) ate 49151 ($BFFF) nao sao usadas. 

A Tabela G.1 mostra como a memoria e alocada no sistema do Apple II. Veja que existem 
dois blocos de posigoes de memoria livres, entre as duas paginas graficas de alta resolugao. 0 apon- 
tador do sistema LOMEM: mantem o controle do limite inferior desta area livre, e o apontador do 
sistema HIMEM: marca o limite superior. A memoria RAM pode ser usada para varias coisas. Entre 
elas esta o interpretador Applesoft nao firmware (do cassette ou disco), o Sistema Operacional em 
Disco (DOS), grSficos em alta resolugao e seu programa e variaveis em BASIC. 


OS INTERPRETADORES DE LINGUAGEM BASIC 

Pode-se ver na Tabela G.1 que o interpretador Integer BASIC sempre reside em ROM. 0 interpre¬ 
tador Applesoft tambem reside em ROM se o sistema tern o cartao Applesoft Firmware ou o car- 
tao Language System instalado. De outra forma, o interpretador Applesoft ocupa aproximada- 
mente 10K bytes de memoria iniciando em 2048 ($800). 
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TABELA G.l. Organizagao da Memoria no BASIC. 


Posigao 

Tipo de 

Uso 

Decimal 

Hex 

Memoria 

0-255 

$0-$0FF 

RAM 

Programas do sistema 

256-511 

$100-$1 FF 

RAM 

Pilha do sistema 

512-767 

$200-$2FF 

RAM 

Buffer de entrada do teclado 

768-1023 

$300-$3FF 

RAM 

Posigoes dos vetores do Monitor 

1024-2047 

$400-$7FF 

RAM 

Pdgina 1 de texto e grdficos em baixa resolugao 

2048-3071 

$800-$BF F 

RAM 

Pagina 2 de texto e grdficos em baixa resolugao 

3072-8191 

$C00-$1 FFF 

RAM 

Livre 

8192-16383 

$2000-$3FFF 

RAM 

Pagina gr^fica de alta resolugao 1 

16384-24575 

$4000-$5FFF 

RAM 

Pagina grdfica de alta resolugao 2 

24576-49151 

$6000-$BFFF 

RAM 

Livre 

49152-49279 

$C000-$C07F 

E/S 

Posigoes internas especiais 

49280-49407 

$C080-$C0FF 

E/S 

Espago dos cartoes perif6ricos de E/S 

49408-51199 

$C100-$C7FF 

E/S 

Memdria dos cartfies perifdricos 

51200-53247 

$C800-$CFFF 

E/S 

Expansao de memdria dos cartdes perifdricos 

53248-65535 

$D000-$FFFF 

ROM 

Integer BASIC, Applesoft, o Monitor ou Autostart 
Monitor etc. 


REQUISITOS DE MEMORIA DO DOS 

Precisa-se no minimo de 16K de memoria para usar o DOS. Quando carregado, o DOS usa aproxi- 
madamente os 10K de cima da memoria. HI MEM: e alterado para indicar imediatamente abaixo 
da memoria usada pelo DOS. A Figura G.l mostra como cada parte da memoria e usada pelo 



Taman ho do Sistema 


Legenda 


□ 

□ 

□ 


Interpretador Applesoft 
nao Firmware 

Pagina Gr^fica de 
Alta Resolugao 1 

Pdgina Grdfica de 
Alta Resolugao 2 


□ Sistema 


□ DOS (usa 10.752 bytes) 

□ Espago livre 


FIGURA G.l. Uso da Memoria RAM. 
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O DOS f ica aqui apds 
o carregamento 

h- 


Primeiro o DOS £ posto aqui 




Buffer usado durante 

o carregamento 




Carregamento inicia aqui* 





Enderepo RAM mais alto (HIMEM:) 

10,752 ($2A00) bytes 


16383 ($3FFF) 

6912 ($1 BOO) 

2303 ($8FF) 

2048 ($800) 

1023 ($3FF) 

512 ($200) 

* Na versao de 13 setores 


FIGURA G.2. Uso da Memoria Durante o Carregamento. 


DOS em varios tamanhos de sistemas. Veja tambem que se deve ter no mfnimo 24K de RAM para 
suportar o DOS junto com Applesoft em disco (ou cassette), e no rmnimo 32K para usar a pagina 
1 de grafico em alta resolupao com o DOS. A Figura G.1 mostra claramente o conflito existente 
entre o Applesoft em disco ou cassette e a pagina grafica de alta resolupao 1. 

O DOS usa v^rias partes adicionais da memoria enquanto esta sendo carregado (veja na 
Figura G.2). Qualquer coisa presente nessas areas antes do carregamento estara perdida depois dele. 


USO DE MEMORIA DO INTEGER BASIC 

Os programas em Integer BASIC residem na parte mais alta da memoria RAM, iniciando em 
HIMEM:. Como mostrado na Figura G.3, HIMEM: e ajustado automaticamente quando se adi- 
ciona, altera ou elimina linhas de programa. 

As variaveis sao guardadas iniciando em LOMEM: e locadas para cima. Na medida em que 
os requisitos de armazenamento de variaveis aumentam, o LOMEM: e ajustado automaticamente. 
Cada variavel numerica e mapeada na memoria com quatro atributos: nome, o byte DSP (ligado/ 
desligado), a posicao de memoria da proxima variavel e o valor ou valores da variavel. 

O nome de uma variavel pode ter ate 100 caracteres de comprimento. Cada caractere e repre- 
sentado na memoria por um codigo ASCII, com o bit de maior ordem em 1. 

O byte DSP indica se o comando DSP esta atuante para a variavel. Este byte, normalmente 
em 0, e colocado em 1 quando o DSP e executado para aquela variavel, e colocado em 0 quando 
NO DSP e executado. 

O endereco da proxima variavel e guardado em dois bytes, com o de menor ordem primeiro. 

Os dados sao guardados em pares de bytes, com o byte de menor ordem primeiro. Se a varia¬ 
vel nao e um arranjo, existe apenas um desses pares. Se ela e arranjo, existe um par por elemento, 
listados na ordem iniciando com elemento zero. Nao existe distinpao entre uma variavel simples 
e um arranjo com o mesmo nome; a variavel simples e o elemento zero de um arranjo. 
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Lin has do programa 
crescem para 
baixo 


Este enderego pode ser achado nas 
posigoes 76 e 77 (HIMEM:) 


T 


Armazenamento 
variaveis crescem 



Este enderego pode ser achado nas 
posigoes 204 e 205 (LOMEM:) 


para cima 


FIGURA G.3. Mapa de Memoria de Programa em Integer BASIC. 


As variaveis cordao sao guardadas de forma semelhante. O nome da variavel, o byte DSP, e 
o enderego da proxima variavel sao guardados da mesma forma que os valores numericos. 0 codigo 
ASCII para cada caractere do cordao usa um byte, com o bit de maior ordem colocado em 1. 
0 ultimo caractere do cordao e seguido por um byte terminador de cordao, no qual o bit de maior 
ordem e 0. 

USO DE MEMtiRIA NO APPLESOFT 

As linhas de programa do Applesoft ocupam a parte inferior da memoria RAM livre iniciandoem 
LOMEM:, como mostrado na Figura G.4. Quando se adiciona, altera ou elimina as linhas de pro¬ 
grama, LOMEM: e ajustado automaticarnente. As variaveis numericas simples e apontadores de 
cordao sao guardados diretamente acima das linhas de programa. Arranjos e apontadores de 
arranjos tipo cordao sao guardados acima das variaveis simples. Os valores dos cordoes sao guar¬ 
dados no alto da memoria, iniciando em HIMEM:. Usando mais variaveis tipo cordao, HIMEM: 
ajusta-se automaticarnente para baixo. 

Cada variavel numerica "e" apontador de cordao usa sete bytes de memoria. Cada variavel 
real usa dois codigos ASCII (dois bytes) para o nome da variavel (ambos com o bit de maior ordem 
em 1). 0 valor e guardado em notagao cientffica com um byte para o expoente e quatro para a 
mantissa. Esses bytes da mantissa estao na ordem do mais significativo para o menos. 

Cada variavel inteira tambem usa dois codigos ASCII (dois bytes) para o nome da variavel 
(ambos com o bit de maior ordem em 1) e dois bytes para o valor da variavel, com o byte de 
maior ordem primeiro. 

Cada apontador de cordao usa dois caracteres ASCII (dois bytes) para o nome da variavel 
(o bit de maior ordem em 1, e o segundo em 0), um byte para o comprimento do cordao, e dois 
bytes para o enderego do valor do cordao, byte de menor ordem primeiro. Os ultimos tres bytes 
de uma variavel inteira e os dois ultimos de um apontador de cordao nao sao usados. 

Arranjos numericos e arranjos de apontadores de cordoes sao guardados imediatamente 
acima das variaveis. O nome da variavel e guardado como um codigo ASCII nos dois primeiros 
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HIMEM: 


LOMEM: 


■ 

Montagem dos cordoes 
para baixo 

L 


' 

f Apontadores dos cordoes el 

apontadores de variaveis 

! 

Varidveis simples e 
apontadores de cordoes 

' 

' 

c 

Lin has de programa 
:olocam o LOMEM: para cinrv 

1 

3 


FIGURA G.4. Mapa de Memoria para Programas em Applesoft. 


bytes; ambos os bits de maior ordem para variaveis reais sao 0, ambos sao 1 para variaveis inteiras, 
e o primeiro e 1 e o segundo 0 para apontadores de cordoes. 

0 nome da variavel e seguido por dois bytes que indicam a posicao da proxima variavel. Isso 
e dado em relapao ao primeiro byte do nome da variavel, byte de menor ordem primeiro. A seguir 
vem urn byte para o numero de dimensoes, e dois bytes para cada dimensao (maior ordem primei¬ 
ro) indicando o tamanho de cada dimensao. Os tamanhos sao listados em ordem inversa, ou seja, 
o tamanho da ultima dimensao e dado primeiro. 

Cada elemento de um arranjo e entao listado, do elemento (0, 0, ... , 0) ao elemento (N, N, 
.. ., N). Os elementos sao guardados na ordem, com o fndice mais da esquerda incrementado pri¬ 
meiro. Cada elemento de um arranjo real usa cinco bytes, um para o expoente, e quatro (mais 
significativo primeiro) para a mantissa. Cada elemento inteiro usa dois bytes, maior ordem pri¬ 
meiro. Cada elemento apontador de cordao usa tres bytes, um para o comprimento do cordao e 
dois (menor ordem primeiro) para o enderepo do cordao. 

Os valores dos cordoes sao guardados na parte mais alta da memoria RAM. Eles requerem um 
byte de memoria para cada caractere. Os cordoes duplicados sao guardados apenas uma vez; dois 
ou mais apontadores de cordao podem apontar uma posicao. A medida em que novos cordoes vao 
sendo criados, sao colocados nas proximas posipoes dispom'veis (HIMEM: ajustado para baixo). 
Os cordoes que nao estao sendo usados ficam na memoria. A funcao FRE elimina a "colecao de 
detritos" eliminando todos os cordoes abandonados e reajustando o HIMEM:. 
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Formato do Disk II 


A informagao e guardada no disquette em 35 bandas concentricas chamadas trilhas. Essas trilhas 
sao numeradas de 0 a 34 ($0 ate $22). Cada trilha e dividida em 16 segmentos chamados setores, 
numerados de 0 ate 15 ($0 ate $F). Cada setor pode guardar ate 256 bytes de dados. O DOS 
reserva tres trilhas (48 setores) para ele mesmo, e uma trilha (16 setores) para o diretbrio do dis¬ 
quette. Isso deixa 31 trilhas (496 setores) para arquivos de dados e de programas. 

0 DOS transfere dados de e para o disco um setor por vez. Ele usa dois buffers de arquivo na 
memoria, um para leitura e outro para gravagao, para cada arquivo ativo. 

Cada tipo de texto (texto, programa e binario) tern seu proprio formato no disco. Os textos 
sao gravados em codigos ASCII, um byte por caractere. Um byte zero marca o fim do arquivo. 
Todos os bytes de um arquivo de texto sao interpretados como texto. 

Os primeiros dois bytes do primeiro setor de um arquivo de programa BASIC indica o com- 
primento do programa, com o byte de menor ordem primeiro. 0 resto do arquivo contem o pro¬ 
grama em codigo ASCII. Num arquivo em Applesoft, as palavras reservadas sao codificadas ao inves 
de guardadas inteiras (um codigo e um byte em codigo ASCII). Veja no Apendice F a lista de codi¬ 
gos em ordem alfabetica e no Apendice I a lista em ordem numerica. 

Os primeiros dois bytes do primeiro setor de um arquivo binario mostra o enderego inicial 
dos dados binarios na memoria RAM, com o byte de menor ordem primeiro. Os dois bytes seguin- 
tes dao o comprimento do arquivo, com o byte de menor ordem primeiro. 0 resto do arquivo 
contem os dados binarios. 


A LISTA DE TRILHA/SETOR 

0 DOS normalmente grava no disco onde quer que ele ache um setor livre. Isso quer dizer que 
num arquivo de muitos setores, o arquivo fica espalhado entre varias trilhas. 0 DOS faz uma lista 
de numeros de trilhas e setores usados para cada arquivo e a guarda num ou mais setores adicionais 
no disquette. Esta e chamada lista de trilha/setor. 
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Cada setor da lista contem um apontador para o proximo setor da lista (seexistir) e aponta 
para ate 122 setores que o arquivo pode conter. 

Um setor de dados nao usado nao e gravado no disquette. Em seu lugar, o apontador para 
ele na lista de trilha/setor e 0, isso diz ao DOS para nao procurar dados naquele setor. Alem disso, 
o ultimo setor da lista e aquele com o apontador para o ultimo setor de dados. Assim, se o registro 
numero 5000 e o primeiro e unico registro num arquivo de acesso aleatorio que tern o parametro L 
de 256 (um registro por setor), 42 setores serao usados. O dado no registro 5000 usa um setor. 
A lista de trilha/setor usa os outros 41 setores (122 ponteiros por setor vezes 41 setores e igual a 
5002 apontadores de registro). Todos os apontadores serao zero exceto o do registro 5000. 

0 byte 0 e os bytes de 3 a 12 do setor da lista de trilha/setor nao sao usados. Os bytes 1 e 2 
contem o numero da trilha e os numeros dos setores, respectivamente, do proximo setor da lista. 
Se esses bytes forem ambos zero, este sera o ultimo setor da lista. 


o diretOrio 

0 DOS usa a trilha 17 ($11) para o diretorio do disquette. Para cada arquivo, o diretorio contem 
o nome, o tipo, o numero de setores ocupados por ele (modulo 256) e a posicao da lista de trilha/ 
setor. Muitas dessas informacoes sao mostradas com o comando CATALOG. 

Cada setor do diretorio contem informacao de um a sete arquivos. O diretorio inicia na 
trilha 17 setor 15. Quando este setor esta cheio, o diretorio continua no setor 14 etc, ate o setor 1. 
0 diretorio pode conter entradas para ate 84 arquivos. 

O byte 0 e os bytes 3 ate 10 de cada setor de diretorio nao sao usados. Os bytes 1 e 2 con¬ 
tem, respectivamente, os numeros da trilha e do setor seguinte do diretorio. Se ambos sao 0, este 
e o ultimo setor do diretorio. Os bytes de 11 ate 255 contem as entradas do diretorio. Cada 
entrada usa 35 bytes; a primeira entrada vai do byte 11 ate o 45, a segunda do 46 ao 80 etc. 

As entradas de diretorio sao escritas no mesmo formato. A Tabela H.1 mostra o conteudo 
de cada entrada. A Tabela H.2 mostra como o tipo de arquivo e codificado em cada entrada. 


TABELA H.1. Formato do Diretorio de Entrada. 


Numero do Byte 
Relativo 

Conteudo do Byte 

0 

Numero da trilha na tabela de trilha/setor. Muda para 255 quando o 
arquivo e eliminado (conteudo formador retiro no byte relativo 34). 

1 

Numero de setor da lista de trilha/setor. 

2 

Tipo de arquivo. Veja Tabela H.2. 

3-32 

Nome do arquivo, em ASCII. 

33 

Numero de setores usados no arquivo, modulo 256. 

34 

Marca de fim. Normalmente 0, mas trocado para o conteudo formador 
do byte relativo 0 quando o arquivo e eliminado. 
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0 setor 0 da trilha 17 nao tem entradas de diretorio. Em seu lugar, ele tem informapao de 
identificacao de estado, descripao ffsica e espapo dispom'vel do disco. A Tabela H.3 mostra o con¬ 
teudo deste importante setor, chamado de Tabela de Volume do Conteudo. 

TABELA H.2. Codificapao dos Tipos de Arquivos do Diretorio do Disco. 


Bit 

Caracterfstica 

0 

1 

2 

3-6 

7 

Arquivo de programa em Integer BASIC se este bit e 1. 

Arquivo de programa em Applesoft se este bit e 1. 

Arquivo de programa binario se este bit e 1. 

Reservado para futura expansao. 

Arquivo travado se este bit e 1. 


Se os bits de 0 ate 6 forem todos 0, o arquivo e de texto. 


TABELA H.3. Tabela de Volume do Conteudo (setor 0, trilha 17) 


Byte 

Descripao 

0 

Nao usado. 

1 

2 

3 

4-5 

6 

7-38 

39 

Numero de trilha do primeiro setor do diretorio. 

Numero de setor do primeiro setor do diretorio. 

Numero de distribuicao do DOS. 

Nao usados. 

Numero de volume do disquette. 

Nao usados. 

Numero maximo de pares trilha/setor possfveis em cada setor da lista 
de trilha/setor. 

40-47 

48-51 

52 

53 

54-55 

56-59 

60-63 

64-195 

196-255 

Nao usados. 

Mascara para o mapa de setores disponfveis. 

Numero de trilhas por disquette. 

Numero de setores por disquette. 

Numero de bytes por setor: byte de menor ordem em 54, maior em 55. 
Mapa de setores disponfveis, trilha 0. 

Mapa de setores disponfveis, trilha 1. 

Mapas de setores disponfveis, trilhas 2 ate 195. 

Nao usados. 
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Cada grupo de quatro bytes do 56 ate o 195 da Tabela de Volume do Conteudo contem um 
mapa de disponibilidade para uma das trilha do disco. Cada mapa identifica quais setores da trilha 
associada esta em uso e qual estS disponfvel. Um bit tern o valor de 0 quando o setor correspon- 
dente esta em uso, e tern o valor 1 quando o setor correspondente esta livre. A Tabela H.4 indica 
quais bytes identificam quais setores. 


TABELA H.4. Mapa de Disponibilidade de Setores. 


Byte 

Bit 

Setor 

Primeiro 

7 

15 


6 

14 


5 

13 


4 

12 


3 

11 


2 

10 


1 

9 


0 

8 

Segundo 

7 

7 


6 

6 


5 

5 


4 

4 


3 

3 


2 

2 


1 

1 


0 

0 

Terceiro 

Todos 

Nao usado 

Quarto 

Todos 

Nao usado 






I 

Codigos de Caracteres Ascii 
e Codigos de Palavras Reservadas 

do Applesoft 


A primeira tabela neste apendice mostra os codigos ASCII de 1 a 96 e os caracteres que repre- 
sentam. Os codigos ASCII na faixa de 96 a 127 produzem os mesmos caracteres na tela do Apple II 
que os codigos de 32 ate 63, embora com outros dispositivos de sai'da os codigos de 96 a 127 
produzem letras minusculas. Nenhuma tecla do teclado do Apple II produz codigos de 96 a 127. 

Os codigos ASCII de 128 a 255 repetem os codigos de 0 a 127. Nenhuma tecla do Apple II 
produz estes codigos em Applesoft, embora eles possam ser gerados pelo Monitor e pelo Integer 
BASIC. 

A segunda tabela lista os codigos de palavras reservadas do Applesoft. Cada palavra reservada 
usa apenas um byte na memoria do programa. Cada palavra reservada e representada por um codi- 
go, na faixa de 128 ate 255. Este codigo substitui a palavra inteira na memoria do Apple II e no 
disco. A lista esta na ordem numerica por codigo. 0 Apendice F contem uma lista de palavras 
reservadas em ordem alfabetica. 
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Codigos de Caracteres ASCII. 


C6digo 

Caractere da 

Teclagem 

Codigo 

Caractere da 

Teclagem 

ASCII 

Tela 

ASCII 

Tela 

0 


Ctrl- @ 

48 

0 

0 

1 


Ctrl-A 

49 

1 

1 

2 


Ctrl-B 

50 

2 

2 

3 


Ctrl-C 

51 

3 

3 

4 


Ctrl-D 

52 

4 

4 

5 


Ctrl-E 

53 

5 

5 

6 


Ctrl-F 

54 

6 

6 

7 

(bell) 

Ctrl-G 

55 

7 

7 

8 

(backspace) 

Ctrl-H or - — 

56 

8 

8 

9 


Ctrl-1 

57 

9 

9 

10 

(linefeed) 

Ctrl-J 

58 



11 


Ctrl-K 

59 



12 


Ctrl-L 

60 

< 

< 

13 

(carriage return) 

Ctrl-M 

61 

= 

S 

14 


Ctrl-N 

62 

> 

> 

15 


Ctrl-0 

63 

? 

? 

16 


Ctrl-P 

64 

@ 

@ 

17 


Ctrl-Q 

65 

A 

A 

18 


Ctrl-R 

66 

B 

B 

19 


Ctrl-S 

67 

C 

C 

20 


Ctrl-T 

68 

D 

D 

21 

(forward space) 

Ctrl-U or —► 

69 

E 

E 

22 


Ctrl-V 

70 

F 

F 

23 


Ctrl-W 

71 

G 

G 

24 

(cancela linha) 

Ctrl-X 

72 

H 

H 

25 


Ctrl-Y 

73 

1 

1 

26 


Ctrl-Z 

74 

J 

J 

27 


Esc 

75 

K 

K 

28 


n.d. 

76 

L 

L 

29 


Ctrl-Shift-M 

77 

M 

M 

30 


Ctrl- a 

78 

N 

N 

31 


n.d. 

79 

0 

0 

32 

espago 

barra espago 

80 

P 

P 

33 

I 

I 

81 

Q 

Q 

34 



82 

R 

R 

35 

# 

# 

83 

S 

S 

36 

$ 

$ 

84 

T 

T 

37 

% 

% 

85 

U 

U 

38 

& 

& 

86 

V 

V 

39 



87 

w 

w 

40 

( 

( 

88 

X 

X 

41 

) 

) 

89 

Y 

Y 

42 

• 

# 

90 

z 

z 

43 

+ 

+ 

91 

( 

n.d. 

44 


, 

92 

\ 

n.d. 

45 

- 


93 

] 

Shift-M 

46 



94 

A 

A 

47 

/ 

/ 

95 


n.d. 

Nota: Some 128 ao codigo ASCII se gerado por teclagem no Monitor ou no Integer BASIC, 
n.d. = nao disponfvel no teclado do Apple II. 
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Codigos de Palavras Reservadas do Applesoft. 


Token 

Reserved 

Word 

Token 

Reserved 

Word 

Token 

Reserved 

Word 

128 

END 

164 

LOMEM: 

200 

+ 

129 

FOR 

165 

ONERR 

201 

- 

130 

NEXT 

166 

RESUME 

202 

# 

131 

DATA 

167 

RECALL 

203 

/ 

132 

INPUT 

168 

STORE 

204 

A 

133 

DEL 

169 

SPEED = 

205 

AND 

134 

DIM 

170 

LET 

206 

OR 

135 

READ 

171 

GOTO 

207 

> 

136 

GR 

172 

RUN 

208 

= 

137 

TEXT 

173 

IF 

209 

< 

138 

PR# 

174 

RESTORE 

210 

SGN 

139 

IN# 

175 

& 

211 

INT 

140 

CALL 

176 

GOSUB 

212 

ABS 

141 

PLOT 

177 

RETURN 

213 

USR 

142 

HLIN 

178 

REM 

214 

FRE 

143 

VLIN 

179 

STOP 

215 

SCRN( 

144 

HGR2 

180 

ON 

216 

PDL 

145 

HGR 

181 

WAIT 

217 

POS 

146 

HCOLOR= 

182 

LOAD 

218 

SQR 

147 

HPLOT 

183 

SAVE 

219 

RND 

148 

DRAW 

184 

DEF 

220 

LOG 

149 

XDRAW 

185 

POKE 

221 

EXP 

150 

HTAB 

186 

PRINT 

222 

COS 

151 

HOME 

187 

CONT 

223 

SIN 

152 

ROT = 

188 

LIST 

224 

TAN 

153 

SCALE= 

189 

CLEAR 

225 

ATN 

154 

SHLOAD 

190 

GET 

226 

PEEK 

155 

TRACE 

191 

NEW 

227 

LEN 

156 

NOTRACE 

192 

TAB( 

228 

STR$ 

157 

NORMAL 

193 

TO 

229 

VAL 

158 

INVERSE 

194 

FN 

230 

ASC 

159 

FLASH 

195 

SPC( 

231 

CHR$ 

160 

COLOR= 

196 

THEN 

232 

LEFTS 

161 

POP 

197 

AT 

233 

RIGHTS 

162 

VTAB 

198 

NOT 

234 

MID$ 

163 

HIMEM: 

199 

STEP 
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Tabelas de Conversao 


Este apendice contem as seguintes tabelas de conversao: 

• Numeros Hexadecimal - Binarios 

• Numeros Hexadecimal - Decimais Inteiros 


Tabela de Conversao Hexadecimal Binario 


Use a tabela abaixo para conversoes entre numeros hexadecimais na faixa de O OF e binarios na 
faixa 0000-1111. 

Para converter numeros maiores para hexadecimal, converte-se quatro di'gitos binarios por 
vez, operando da direita para a esquerda. Se existirem menos que quatro di'gitos binarios no 
grupo mais & esquerda, adicione zeros a direita. Aqui esta um exemplo: 

100101 2 = OOlOOlOlj 



25 16 


Converta numeros hexadecimais maiores que OF para binario, um di'gito por vez. Aqui esta um 
exemplo: 



001101112 


Hexadecimal 

Bin4rio 

Hexadecimal 

Binario 

00 

0000 

08 

1000 

01 

0001 

09 

1001 

02 

0010 

0A 

1010 

03 

0011 

0B 

1011 

04 

0100 

OC 

1100 

05 

0101 

0D 

1101 

06 

0110 

0E 

1110 

07 

0111 

OF 

1111 
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TABELA DE CONVERSAO HEXADECIMAL-DECIMAL INTEIRO 


A tabela abaixo permite conversao direta entre 
inteiros hexadecimais de O-FFF e decimals inteiros 
na faixa de 0-4096. Para conversao de numeros 
maiores.. os valores da tabela podem ser adiciona- 
dos aos seguintes: 


Hexadecimal 

Decimal 

Hexadecimal 

Decimal 

01 000 

4 096 

20 000 

131 072 

02 000 

8 192 

30 000 

196 608 

03 000 

12 288 

40 000 

262 144 

04 000 

16 384 

50 000 

327 680 

05 000 

20 480 

60 000 

393 216 

06 000 

24 576 

70 000 

458 752 

07 000 

28 672 

80 000 

524 288 

08 000 

32 768 

90 000 

589 824 

09 000 

36 864 

A0 000 

655 360 

0A 000 

40 960 

B0 000 

720 896 

0B 000 

45 056 

CO 000 

786 432 

0C 000 

49 152 

DO 000 

851 968 

0D 000 

53 248 

E0 000 

917 504 

0E 000 

57 344 

F0 000 

983 040 

OF 000 

61 440 

100 000 

1 048 576 

10 000 

65 536 

200 000 

2 097 152 

11 000 

69 632 

300 000 

3 145 728 

12 000 

73 728 

400 000 

4 194 304 

13 000 

77 824 

500 000 

5 242 880 

14 000 

81 920 

600 000 

6 291 456 

15 000 

86 016 

700 000 

7 340 032 

16 000 

90 112 

800 000 

8 388 608 

17 000 

94 208 

900 000 

9 437 184 

18 000 

98 304 

A00 000 

10 485 760 

19 000 

102 400 

BOO 000 

11 534 336 

1A 000 

106 496 

COO 000 

12 582 912 

IB 000 

110 592 

D00 000 

13 631 488 

1C 000 

114 688 

E00 000 

14 680 064 

ID 000 

118 784 

F00 000 

15 728 640 

IE 000 

122 880 

1 000 000 

16 777 216 

IF 000 

126 976 

2 000 000 

33 554 432 


As frapdes hexadecimais podem ser convertidas pa¬ 
ra frapoes decimais como segue: 

1. Expresse a frapao decimal como um inteiro ve- 
zes 16* n , onde n 6 o numero de posipoes deci¬ 
mais significativas hexadecimais colocadas & 
direita do ponto hexadecimal 

0. CA9BF3i6 = CA9BF3i6 X 16~ 6 

2. Ache o equivalente decimal ao inteiro hexa¬ 
decimal 

CA9 BF3i6 = 13 278 195 10 

3. Muitiplique o decimal equivalente por 16E' n 

13 278 195 

X 596 046 448 X 10~ 16 

0.791 442 096 10 

As frapoes decimais podem ser convertidas para 
frapdes hexadecimais multiplicand© sucessivamente 
a frapao decimal por 16 na base 10. 

Apos cada multiplicapao, a porpao inteira 6 
removida para formar a frapao hexadecimal mon- 
tada a direita do ponto hexadecimal. Entretanto, 
desde que e usada aritm6tica decimal para esta 
conversao, a porpao inteira de cada produto deve 
ser convertida para numeros hexadecimais. 

Exemplo: Converter 0.895 base 10 para seu 
equivalente hexadecimal: 




0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

A 

B 

C 

D 

E 

F 

00 

0000 

0001 

0002 

0003 

0004 

0005 

0006 

0007 

0008 

0009 

0010 

0011 

0012 

0013 

0014 

0015 

01 

0016 

0017 

0018 

0019 

0020 

0021 

0022 

0J23 

0024 

0025 

0026 

0027 

0028 

0029 

0030 

0031 

02 

0032 

0033 

0034 

0035 

0036 

0037 

0038 

0039 

0040 

0041 

0042 

0043 

0044 

0045 

0046 

0047 

03 

0048 

0049 

0050 

0051 

0052 

0053 

0054 

0055 

0056 

0057 

0058 

0059 

0060 

0061 

0062 

0063 

04 

0064 

0065 

0066 

0067 

0068 

0069 

0070 

0071 

0072 

0073 

0074 

0075 

0076 

0077 

0078 

0079 

05 

0080 

0081 

0082 

0083 

0084 

0085 

0086 

0087 

0088 

0089 

0090 

0091 

0092 

0093 

0094 

0095 

06 

0096 

0097 

0098 

0099 

0100 

0101 

0102 

0103 

0104 

0105 

0106 

0107 

0108 

0109 

0110 

0111 

07 

0112 

0113 

0114 

0115 

0116 

0117 

0118 

0119 

0120 

0121 

0122 

0123 

0124 

0125 

0126 

0127 

08 

0128 

0129 

0130 

0131 

0132 

0133 

0134 

0135 

0136 

0137 

0138 

0139 

0140 

0141 

0142 

0143 

09 

0144 

0145 

0146 

0147 

0148 

0149 

0150 

0151 

0152 

0153 

0154 

0155 

0156 

0157 

0158 

0159 

0A 

0160 

0161 

0162 

0163 

0164 

0165 

0166 

0167 

0168 

0169 

0170 

0171 

0172 

0173 

0174 

0175 

0B 

0176 

0177 

0178 

0179 

0180 

0181 

0182 

0183 

0184 

0185 

0186 

0187 

0188 

0189 

0190 

0191 

OC 

0192 

0193 

0194 

0195 

0196 

0197 

0198 

0199 

0200 

0201 

0202 

0203 

0204 

0205 

0206 

0207 

0D 

0208 

0209 

0210 

0211 

0212 

0213 

0214 

0215 

0216 

0217 

0218 

0219 

0220 

0221 

0222 

0223 

0E 

0224 

0225 

0226 

0227 

0228 

0229 

0230 

0231 

0232 

0233 

0234 

0235 

0236 

0237 

0238 

0239 

0FJ 

0240 

0241 

0242 

0243 

0244 

0245 

0246 

0247 

0248 

0249 

0250 

0251 

0252 

0253 

0254 

0255 
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APPLE II 


TABELA DE CONVERSAO HEXADECIMAL-DECIMAL (cont.) 



0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

A 

B 

C 

D 

E 

r 

10 

0256 

0257 

0258 

0259 

0260 

0261 

0262 

0263 

0264 

0265 

0266 

0267 

0268 

0269 

0270 

0271 

11 

0272 

0273 

0274 

0275 

0276 

0277 

0278 

0279 

0280 

0281 

0282 

0283 

0284 

0285 

0286 

0287 

12 

0283 

0289 

0290 

0291 

0292 

0293 

0294 

0295 

0296 

0297 

0298 

0299 

0300 

0301 

0302 

0303 

13 

0304 

0305 

0306 

0307 

0308 

0309 

0310 

0311 

0312 

0313 

0314 

0315 

0316 

0317 

0318 

0319 

14 

0320 

0321 

0322 

0323 

0324 

0325 

0326 

0327 

0328 

0329 

0330 

0331 

0332 

0333 

0334 

0335 

15 

0336 

0337 

0338 

0339 

0340 

0341 

0342 

0343 

0344 

0345 

0346 

0347 

0348 

0349 

0350 

0351 

16 

0352 

0353 

0354 

0355 

0356 

0357 

0358 

0359 

0360 

0361 

0362 

0363 

0364 

0365 

0366 

0367 

17 

0368 

0369 

0370 

0371 

0377 

0373 

0374 

0375 

0376 

0377 

0378 

0379 

0380 

0381 

0382 

0383 

IB 

0384 

0385 

0386 

0387 

0388 

0389 

0390 

0391 

0392 

0393 

0394 

0395 

0396 

0397 

0398 

0399 

19 

0400 

0401 

0402 

0403 

0404 

0405 

0406 

0407 

0408 

0409 

0410 

0411 

0412 

0413 

0414 

0415 

1A 

0416 

0417 

0418 

0419 

0420 

0421 

0422 

0423 

0424 

0425 

0426 

0427 

0428 

0429 

0430 

0431 

IB 

0432 

0433 

0434 

0435 

0436 

0437 

0438 

0439 

0440 

0441 

0442 

0443 

0444 

0445 

0446 

0447 

1C 

0448 

0449 

0450 

0451 

0452 

0453 

0454 

0455 

0456 

0457 

0458 

0459 

0460 

0461 

0462 

0463 

ID 

0464 

0465 

0466 

0467 

0468 

0469 

0470 

0471 

0472 

0473 

0474 

0475 

0476 

0477 

0478 

0479 

IE 

0480 

0481 

0482 

0483 

0484 

0485 

0486 

0487 

0488 

0489 

0490 

0491 

0492 

0493 

0494 

0495 

IF 

0496 

0497 

0498 

0499 

0500 

0501 

0502 

0503 

0504 

0505 

0506 

0507 

0508 

0509 

0510 

0511 

20 

0512 

0513 

0514 

0515 

0516 

0517 

0518 

0519 

0520 

0521 

0522 

0523 

0524 

0525 

0526 

0527 

21 

0528 

0529 

0530 

0531 

0532 

0533 

0534 

0535 

0536 

0537 

0538 

0539 

0540 

0541 

0542 

0543 

22 

0544 

0545 

0546 

0547 

0548 

0549 

0550 

0551 

0552 

0553 

0554 

0555 

0556 

0557 

0558 

0559 

23 

0560 

0561 

0562 

0563 

0564 

0565 

0566 

0567 

0568 

0569 

0570 

0571 

0572 

0573 

0574 

0575 

24 

0576 

0577 

0578 

0579 

0580 

0581 

0582 

0583 

0584 

0585 

0586 

0587 

0588 

0589 

0590 

0591 

25 

0592 

0593 

0594 

0595 

0596 

0597 

0598 

0599 

0600 

0601 

0602 

0603 

0604 

0605 

0606 

0607 

26 

0608 

0609 

0610 

0611 

0612 

0613 

0614 

0615 

0616 

0617 

0618 

0619 

0620 

0621 

0622 

0623 

27 

0624 

0625 

0626 

0627 

0628 

0629 

0630 

0631 

0632 

0633 

0634 

0635 

0636 

0637 

0638 

0639 

28 

0640 

0641 

0642 

0643 

0644 

0645 

0646 

0647 

0648 

0649 

0650 

0651 

0652 

0653 

0654 

0655 

29 

0656 

0657 

0658 

0659 

0660 

0661 

0662 

0663 

0664 

0665 

0666 

0667 

0668 

0669 

0670 

0671 

2A 

0672 

0673 

0674 

0675 

0676 

0677 

0678 

0679 

0680 

0681 

0682 

0683 

0684 

0685 

0686 

0687 

2B 

0688 

0689 

0690 

0691 

0692 

0693 

0694 

0695 

0696 

0697 

0698 

0699 

0700 

0701 

0702 

0703 

2C 

0704 

0705 

0706 

0707 

0708 

0709 

0710 

0711 

0712 

0713 

0714 

0715 

0716 

0717 

0718 

0719 

2D 

0720 

0721 

0722 

0723 

0724 

0725 

0726 

0727 

0728 

0729 

0730 

0731 

0732 

0733 

0734 

0735 

2E 

0736 

0737 

0738 

0739 

0740 

0741 

0742 

0743 

0744 

0745 

0746 

0747 

0748 

0749 

0750 

0751 

2F 

0752 

0753 

0754 

0755 

0756 

0757 

0758 

0759 

0760 

0761 

0762 

0763 

0764 

0765 

0766 

0767 

30 

0768 

0769 

0770 

0771 

0772 

0773 

0774 

0775 

0776 

0777 

0778 

0779 

0780 

0781 

0782 

0783 

31 

0784 

0785 

0786 

0787 

0788 

0789 

0790 

0791 

0792 

0793 

0794 

0795 

0796 

0797 

0798 

0799 

32 

0800 

0801 

0802 

0803 

0804 

0805 

0806 

0807 

0808 

0809 

0810 

0811 

0812 

0813 

0814 

0815 

33 

0816 

0817 

0818 

0819 

0820 

0821 

08Z2 

0823 

0824 

0825 

0826 

0827 

0828 

0829 

0830 

0831 

34 

0832 

0833 

0834 

0835 

0836 

0837 

0838 

0839 

0840 

0841 

0842 

0843 

0844 

0845 

0846 

0847 

35 

0848 

0849 

0850 

0851 

0852 

0853 

0854 

0855 

0856 

0857 

0858 

0859 

0860 

0861 

0862 

0863 

36 

0864 

0865 

0866 

0867 

0868 

0869 

0870 

0871 

0872 

0873 

0874 

0875 

0876 

0877 

0878 

0879 

37 

0880 

0881 

0882 

0883 

0884 

0885 

0886 

0887 

0888 

0889 

0890 

0891 

0892 

0893 

0894 

0895 

38 

0896 

0897 

0898 

0899 

0900 

0901 

0902 

0903 

0904 

0905 

0906 

0907 

0908 

0909 

0910 

0911 

39 

0912 

0913 

0914 

0915 

0916 

0917 

0918 

0919 

0920 

0921 

0922 

0923 

0924 

0925 

0926 

0927 

3A 

0928 

0929 

0930 

0931 

0932 

0933 

0934 

0935 

0936 

0937 

0938 

0939 

0940 

0941 

0942 

0943 

3B 

0944 

0945 

0946 

0947 

0948 

0949 

0950 

0951 

0952 

0953 

0954 

0955 

0956 

0957 

0958 

0959 

3C 

0960 

0961 

0962 

0963 

0964 

0965 

0966 

0967 

0968 

0969 

0970 

0971 

0972 

0973 

0974 

0975 

3D 

0976 

0977 

0978 

0979 

0980 

0981 

0982 

0983 

0984 

0985 

0986 

0987 

0988 

0989 

0990 

0991 

3E 

0992 

0993 

0994 

0995 

0996 

0997 

0998 

0999 

1000 

1001 

1002 

1003 

1004 

1005 

1006 

1007 

3F 

1008 

1009 

1010 

1011 

1012 

1013 

1014 

1015 

1016 

1017 

1018 

1019 

1020 

1021 

1022 

1023 
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TABELA DE CONVERSAO HEXADECIMAL-DECIMAL (cont.) 



0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

A 

B 

C 

D 

E 

F 

40 

1024 

1025 

1026 

1027 

1028 

1029 

1030 

1031 

1032 

1033 

1034 

1035 

1036 

1037 

1038 

1039 

41 

1040 

1041 

1042 

1043 

1044 

1045 

1046 

1047 

1048 

1049 

1050 

1051 

1052 

1053 

1054 

1055 

42 

1056 

1057 

1058 

1059 

1060 

1061 

1062 

1063 

1064 

1065 

1066 

1067 

1068 

1069 

1070 

1071 

43 

1072 

1073 

1074 

1075 

1076 

1077 

1078 

1079 

1080 

1081 

1082 

1083 

1084 

1085 

1086 

1087 

44 

1088 

1089 

1090 

1091 

1092 

1093 

1094 

1095 

1096 

1097 

1098 

1099 

1100 

1101 

1102 

1103 

45 

1104 

1105 

1106 

1107 

1108 

1109 

1110 

till 

1112 

1113 

1114 

1115 

1116 

1117 

1118 

1119 

46 

1120 

1121 

1122 

1123 

1124 

1125 

1126 

1127 

1128 

1129 

1130 

1131 

1132 

1133 

1134 

1135 

47 

1136 

1137 

1138 

1139 

1140 

1141 

1142 

1143 

1144 

1145 

1146 

1147 

1148 

1149 

1150 

1151 

48 

1152 

1153 

1154 

1155 

1156 

1157 

1158 

1159 

1160 

1161 

1162 

1163 

1164 

1165 

1166 

1167 

49 

1168 

1169 

1170 

1171 

1172 

1173 

1174 

1175 

1176 

1177 

1178 

1179 

1180 

1181 

1182 

1183 

4A 

1184 

1185 

1186 

1187 

1188 

1189 

1190 

1191 

1192 

1193 

1194 

1195 

1196 

1197 

1198 

1199 

4B 

1200 

1201 

1202 

1203 

1204 

1205 

1206 

1207 

1208 

1209 

1210 

1211 

1212 

1213 

1214 

1215 

4C 

1216 

1217 

1218 

1219 

1220 

1221 

1222 

1223 

1224 

1225 

1226 

1227 

1228 

1229 

1230 

1231 

4C 

1232 

1233 

1234 

1235 

1236 

1237 

1238 

1239 

1240 

1241 

1242 

1243 

1244 

1245 

1246 

1247 

4E 

1248 

1249 

1250 

1251 

1252 

1253 

1254 

1255 

1256 

1257 

1258 

1259 

1260 

1261 

1262 

1263 

4F 

1264 

1265 

1266 

1267 

1268 

1269 

1270 

1271 

1272 

1273 

1274 

1275 

1276 

1277 

1278 

1279 

50 

1280 

1281 

1282 

1283 

1284 

1285 

1286 

1287 

1288 

1289 

1290 

1291 

1292 

1293 

1294 

1295 

51 

1296 

1297 

1298 

1299 

1300 

1301 

1302 

1303 

1304 

1305 

1306 

1307 

1308 

1309 

1310 

1311 

52 

1312 

1313 

1314 

1315 

1316 

1317 

1318 

1319 

1320 

1321 

1322 

1323 

1324 

1325 

1326 

1327 

53 

1328 

1329 

1330 

1331 

1332 

1333 

1334 

1335 

1336 

1337 

1338 

1339 

1340 

1341 

1342 

1343 

54 

1344 

1345 

1346 

1347 

1348 

1349 

1350 

1351 

1352 

1353 

1354 

1355 

1356 

1357 

1358 

1359 

55 

1360 

1361 

1362 

1363 

1364 

1365 

1366 

1367 

1368 

1369 

1370 

1371 

1372 

1373 

1374 

1375 

56 

1376 

1377 

1378 

1379 

1380 

1381 

1382 

1383 

1384 

1385 

1386 

1387 

1388 

1389 

1390 

1391 

57 

1392 

1393 

1394 

1395 

1396 

1397 

1398 

1399 

1400 

1401 

1402 

1403 

1404 

1405 

1406 

1407 

58 

1408 

1409 

1410 

1411 

1412 

1413 

1414 

1415 

1416 

1417 

1418 

1419 

1420 

1421 

1422 

1423 

59 

1424 

1425 

1426 

1427 

1428 

1429 

1430 

1431 

1432 

1433 

1434 

1435 

1436 

1437 

1438 

1439 

5* 

1440 

1441 

1442 

1443 

1444 

1445 

1446 

1447 

1448 

1449 

1450 

1451 

1452 

1453 

1454 

1455 

5B 

1456 

1457 

1458 

1459 

1460 

1461 

1462 

1463 

1464 

1465 

1466 

1467 

1468 

1469 

1470 

1471 

5C 

1472 

1473 

1474 

1475 

1476 

1477 

1478 

1479 

1480 

1481 

1482 

1483 

1484 

1485 

1486 

1487 

5D 

1488 

1489 

1490 

1491 

1492 

1493 

1494 

1495 

1496 

1497 

1498 

1499 

1500 

1501 

1502 

1503 

5E 

1504 

1505 

1506 

1507 

1508 

1509 

1510 

1511 

1512 

1513 

1514 

1515 

1516 

1517 

1518 

1519 

5F 

1520 

1521 

1522 

1523 

1524 

1525 

1526 

1527 

1528 

1529 

1530 

1531 

1532 

1533 

1534 

1535 

60 

1536 

1537 

1538 

1539 

1540 

1541 

1542 

1543 

1544 

1545 

1546 

1547 

1548 

1549 

1550 

1551 

61 

1552 

1553 

1554 

1555 

1556 

1557 

1558 

1559 

1560 

1561 

1562 

1563 

1564 

1565 

1566 

1567 

62 

1568 

1569 

1570 

1571 

1572 

1573 

1574 

1575 

1576 

1577 

1578 

1579 

1580 

1581 

1582 

1583 

63 

1584 

1585 

1586 

1587 

1588 

1589 

1590 

1591 

1592 

1593 

1594 

1595 

1596 

1597 

1598 

1599 

64 

1600 

1601 

1602 

1603 

1604 

1605 

1606 

1607 

1608 

1609 

1610 

1611 

1612 

1613 

1614 

1615 

65 

1616 

1617 

16.18 

1619 

1620 

1621 

1622 

1623 

1624 

1625 

1626 

1627 

1628 

1629 

1630 

1631 

66 

1632 

1633 

1634 

1635 

1636 

1637 

1638 

1639 

1640 

1641 

1642 

1643 

1644 

1645 

1646 

1647 

67 

1648 

1649 

1650 

1651 

1652 

1653 

1654 

1655 

1656 

1657 

1658 

1659 

1660 

1661 

1662 

1663 

68 

1664 

1665 

1666 

1667 

1668 

1669 

1670 

1671 

1672 

1673 

1674 

1675 

1676 

1677 

1678 

1679 

69 

1680 

1681 

1682 

1683 

1684 

1685 

1686 

1687 

1688 

1689 

1690 

1691 

1692 

1693 

1694 

1695 

6A 

1696 

1697 

1698 

1699 

1700 

1701 

1702 

1703 

1704 

1705 

1706 

1707 

1708 

1709 

1710 

1711 

6B 

1712 

1713 

1714 

1715 

1716 

1717 

1718 

1719 

1720 

1721 

1722 

1723 

1724 

1725 

1726 

1727 

6C 

1728 

1729 

1730 

1731 

1732 

1733 

1734 

1735 

1736 

1737 

1738 

1739 

1740 

1741 

1742 

1743 

6D 

1744 

1745 

1746 

1747 

1748 

1749 

1750 

1751 

1752 

1753 

1754 

1755 

1756 

1757 

1758 

1759 

6E 

1760 

1761 

1762 

1763 

1764 

1765 

1766 

1767 

1768 

1769 

1770 

1771 

1772 

1773 

1774 

1775 

6F 

1776 

1777 

1778 

1779 

1780 

1781 

1782 

1783 

1784 

1785 

1786 

1787 

1788 

1789 

1790 

1791 
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TABELA DE CONVERSAO HEXADECIMAL-DECIMAL (cont.) 



0 

. 

2 

3 

4 

5 

6 

7 

8 

9 

A 

B 

C 

D 

E 

F 

AO 

2560 

2561 

2562 

2563 

2564 

2565 

2566 

2567 

2568 

2569 

2570 

2571 

2572 

2573 

2574 

2575 

A 1 

2576 

2577 

2578 

2579 

2580 

2581 

2582 

2583 

2584 

2585 

2586 

2587 

2588 

2589 

2590 

2591 

A2 

2592 

2593 

2594 

2595 

2596 

2597 

2598 

2599 

2600 

2601 

2602 

2603 

2604 

2605 

2606 

2607 

A3 

2608 

2609 

2610 

2611 

2612 

2613 

2614 

2615 

2616 

2617 

2618 

2619 

2620 

2621 

2622 

2623 

A4 

2624 

2625 

2626 

2627 

2628 

2629 

2630 

2631 

2632 

2633 

2634 

2635 

2636 

2637 

2638 

2639 

A5 

2640 

2641 

2642 

2643 

2644 

2645 

2646 

2647 

2648 

2649 

2650 

2651 

2652 

2653 

2654 

2655 

A6 

2656 

2657 

2658 

2659 

2660 

2661 

2662 

2663 

2664 

2665 

2666 

2667 

2668 

2669 

2670 

2671 

A 7 

2672 

2673 

2674 

2675 

2676 

2677 

2678 

2679 

2680 

2681 

2682 

2683 

2684 

2685 

2686 

2687 

A8 

2688 

2689 

2690 

2691 

2692 

2693 

2694 

2695 

2696 

2697 

2698 

2699 

2700 

2701 

2702 

2703 

A9 

2704 

2705 

2706 

2707 

2708 

2709 

2710 

2711 

2712 

2713 

2714 

2715 

2716 

2717 

2718 

2719 

AA 

2720 

2721 

2722 

2723 

2724 

2725 

2726 

2727 

2728 

2729 

2730 

2731 

2732 

2733 

2734 

2735 

A8 

2736 

2737 

2738 

2739 

2740 

2741 

2742 

2743 

2744 

2745 

2746 

2747 

2748 

2749 

2750 

2751 

AC 

2752 

2753 

2754 

2755 

2756 

2757 

2758 

2759 

2760 

2761 

2762 

2763 

2764 

2765 

2766 

2767 

AD 

2768 

2769 

2770 

2771 

2772 

2773 

2774 

2775 

2776 

2777 

2778 

2779 

2780 

2781 

2782 

2783 

AE 

2784 

2785 

2786 

2787 

2788 

2789 

2790 

2791 

2792 

2793 

2794 

2795 

2796 

2797 

2798 

2799 

AF 

2800 

2801 

2802 

2803 

2804 

2805 

2806 

2807 

2808 

2809 

2810 

2811 

2812 

2813 

2814 

2815 

BO 

2816 

2817 

2818 

2819 

2820 

2821 

2822 

2823 

2824 

2825 

2826 

2827 

2828 

2829 

2830 

2831 

Bl 

2832 

2833 

2834 

2835 

2836 

2837 

2838 

2839 

2840 

2841 

2842 

2843 

2844 

2845 

2846 

2847 

B2 

2848 

2849 

2850 

2851 

2852 

2853 

2854 

2855 

2856 

2857 

2858 

2859 

2860 

2861 

2862 

2863 

B3 

2864 

2865 

2866 

2867 

2868 

2869 

2870 

2871 

2872 

2873 

2874 

2875 

2876 

2877 

2878 

2879 

B4 

2880 

2881 

2882 

2883 

2884 

2885 

2886 

2887 

2888 

2889 

2890 

2891 

2892 

2893 

2894 

2895 

B5 

2896 

2897 

2898 

2899 

2900 

2901 

2902 

2903 

2904 

2905 

2906 

2907 

2908 

2909 

2910 

2911 

B6 

2912 

2913 

2914 

2915 

2916 

2917 

2918 

2919 

2920 

2921 

2922 

2923 

2924 

2925 

2926 

2927 

B7 

2928 

2929 

2930 

2931 

2932 

2933 

2934 

2935 

2936 

2937 

2938 

2939 

2940 

2941 

2942 

2943 

B8 

2944 

2945 

2946 

2947 

2948 

2949 

2950 

2951 

2952 

2953 

2954 

2955 

2956 

2957 

2958 

2959 

B9 

2960 

2961 

2962 

2963 

2964 

2965 

2966 

2967 

2968 

2969 

2970 

2971 

2972 

2973 

2974 

2975 

BA 

2976 

2977 

2978 

2979 

2980 

2981 

2982 

2983 

2984 

2985 

2986 

2987 

2988 

2989 

2990 

2991 

BB 

2992 

2993 

2994 

2995 

2996 

2997 

2998 

2999 

3000 

3001 

3002 

3003 

3004 

3005 

3006 

3007 

BC 

3008 

3009 

3010 

3011 

3012 

3013 

3014 

3015 

3016 

3017 

3018 

3019 

3020 

3021 

3022 

3023 

BD 

3024 

3025 

3026 

3027 

3028 

3029 

3030 

3031 

3032 

3033 

3034 

3035 

3036 

3037 

3038 

3039 

BE 

3040 

3041 

3042 

3043 

$044 

3045 

3046 

3047 

3048 

3049 

3050 

3051 

3052 

3053 

3054 

3055 

BF 

3056 

3057 

3058 

3059 

3060 

3061 

3062 

3063 

3064 

3065 

3066 

3067 

3068 

3069 

3070 

3071 

CO 

3072 

3073 

3074 

3075 

3076 

3077 

3078 

3079 

3080 

3081 

3082 

3083 

3084 

3085 

3086 

3087 

Cl 

3088 

3089 

3090 

3091 

309? 

3093 

3094 

3095 

3096 

3097 

3098 

3099 

3100 

3101 

3102 

3103 

C2 

3104 

3105 

3106 

3107 

3108 

3109 

3110 

3111 

3112 

3113 

3114 

3115 

3116 

3117 

3118 

3119 

C3 

3120 

3121 

3122 

3123 

3124 

3125 

3126 

3127 

3128 

3129 

3130 

3131 

3132 

3133 

3134 

3135 

C4 

3136 

3137 

3138 

3139 

3140 

3141 

3142 

3143 

3144 

3145 

3146 

3147 

3148 

3149 

3150 

3151 

C5 

3152 

3153 

3154 

3155 

3156 

3157 

3158 

3159 

3160 

3161 

3162 

3163 

3164 

3165 

3166 

3167 

C6 

3168 

3169 

3170 

3171 

3172 

3173 

3174 

3175 

3176 

3177 

3178 

3179 

3180 

3181 

3182 

3183 

C7 

3184 

3185 

3186 

3187 

3188 

3189 

3190 

3191 

3192 

3193 

3194 

3195 

3196 

3197 

3198 

3199 

C8 

3200 

3201 

3202 

3203 

3204 

3205 

3206 

3207 

3208 

3209 

3210 

3211 

3212 

3213 

3214 

32)5 

C9 

3216 

3217 

3218 

3219 

3220 

3221 

3222 

3223 

3224 

3225 

3226 

3227 

3228 

3229 

3230 

3231 

CA 

3232 

3233 

3234 

3235 

3236 

3237 

3238 

3239 

3240 

3241 

3242 

3243 

3244 

3245 

3246 

3247 

CB 

3248 

3249 

3250 

3251 

3252 

3253 

3254 

3255 

3256 

3257 

3258 

3259 

3260 

3261 

3262 

3263 

CC 

3264 

3265 

3266 

3267 

3268 

3269 

3270 

3271 

3272 

3273 

3274 

3275 

3276 

3277 

3278 

3279 

CD 

3280 

3281 

3282 

3283 

3284 

3285 

3286 

3287 

3288 

3289 

3290 

3291 

3292 

3293 

32^4 

3295 

CE 

3296 

3297 

3298 

3299 

3300 

3301 

3302 

3303 

3304 

3305 

3306 

3307 

3308 

3309 

3310 

3311 

CF 

3312 

3313 

3314 

3315 

3316 

3317 

3318 

3319 

3320 

3321 

3322 

3323 

3324 

3325 

3326 

3327 
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Bibliografia 
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Company, 1 973. 
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Peoples Computer Company. What to Do After You Hit Return. Menlo Park, 
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Sack, J., and Meadows, J. Entering BASIC. Science Research Associates, 1973. 


Programapao em Linguagem Assembler 

Leventhal, Lance A. 6502 Assembly Language Programming. Osborne/McGraw- 
Hill, Berkeley, California, 1979. 

Osborne, A. An Introduction to Microcomputers: Volume 1 — Basjc Concepts. 
2nd ed., Osborne/McGraw-Hill, Berkeley, California. 1980. 
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Periodicos 

Apple Orchard, P. 0. Box 1493, Beaverton, Oregon 97075. 

''Apple-Cart,'' Creative Computing. P.O. Box 789-M, Morristown, New Jersey 
07960. 

CALL A. P. P. L. E., 304 Main Ave. S., Suite 300, Renton, Washington 98055. 
Compute!, P.O. 3ox 5406, Greensboro, North Carolina 27403. 

Micro, P.O. Box 6502, Chelmsford, Massachusetts 01824. 

Nibble. P.O. Box 325, Lincoln, Massachusetts 01773. 

Personal Computing, P.O. Box 13916, Philadelphia, Pennsylvania 19101. 
Purser's Magazine. P.O. Box 466, El Dorado, California 95623. 

Softa/k. 10432 Burbank Bl„ N. Hollywood, California 91601. 

Publicapoes da Apple 


Apple ll/ll Plus Reference Manual 
Parallel Printer Interface Manual 
Apple II BASIC Programming Manual 
Applesoft II Reference Manual 
Communications Interface Manual 
High-Speed Serial Interface Manual 
Disk II Floppy Disk Manual (DOS 3.2. 
Applesoft Tutorial Manual 
Graphics Tablet Manual 
Silentype Manual 
The DOS Manual (DOS 3.3) 


A2L0001A 

A2L0004 

A2L0005 

A2L0006 

A2L0007 

A2L0008 

A2L0012 

A2L0018 

A2L0033 

A2L0034 

A2L0036 


L 

Formularios para Desenho na Tela 


Use os formularios deste apendice para projetar o formato da tela. No formulario de tela de texto, 
os numeros de linhas e colunas iniciam em 1, o que e apropriado para operagao com texto. No 
formulario grafico de baixa resolugao, os numeros de linhas e colunas iniciam em 0, assim como os 
comandos graficos de baixa resolugao. 
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Indice Analftico 


ABS, 308-09 

Acumulador, 234, 236-37 
Auto-falante, 102, 222 

posigoes de PEEK e POKE, 336 
Anunciadores, controle de jogo, 338-39 
Apontadores de arquivos, 177-80 
movendo, 184, 189 

APPEND, 184, 280. Veja tamb6m OPEN 
Applesoft. Veja tamWm Programas 
acesso a programas pelo Monitor, 231 
cbdigos de palavras reservadas, 343, 355 
comprimento de linhas de programa, 40 
nomes de variSveis, 61-62 
numeros de linhas, 55 
po si goes de tabulagao em, 112-13 
reinfcio, 33 

reinfcio via CTRL-Y, 246 
troca para Integer BASIC, 46-47, 191 
uso de membria, 347-49 
valores num6ricos, 37 
vlrgulas em, 112-13 
Applesoft Firmware, 7 
Aritm^tica bin^ria, 245-46 
Arquivos 

acesso aleatbrio, 185-89 
buffers, 176, 192 
destravando, 173 

diferengas entre Integer BASIC/Applesoft, 181 
disco, 162 

eliminando do disco, 172 
END OF DATA, 181, 184 
EXEC. 189-90 


fechando, 163 
GET, 182 

guardando numeros em, 183 
linguagem de maquina, 194 
posicionando campos, 184, 189 
rebatizando, 173 
separapao de campos, 183 
sequenciais, 175-81 
setores usados, 167 
tipos, 167 
verificando, 174 
Arquivo sequencial 
abrindo, 176-77 
APPEND, 184 
fechando, 176 
gravando em, 177-82 

Arquivos Imagem Bindria. Veja Arquivos, linguagem 
de maquina 

Arranjos 

armazenamento em cassette, 149-150 
dimensionamento, 64-65 
Indices, 63 

inicializapao, 144, 152 
nomes, 63 

redimensionamento, 77 
Arredondamento, 59 
ASC, 309 
ASCII, 

cbdigos, 354 

programapao de caracteres em, 120-21 
ATN, 309 
Auto, 44, 154, 261 
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BASIC. Veja tamb6m Applesoft e Integer BASIC 
acessando, 26 
caractere de entrada, 35 
com linguagem assembler, 226-28 
iniciando, 27, 34-35 
reiniciando, 33 
versoes do, 26, 191 
BLOAD, 195, 220, 240-41,262 
verificado, 245 
BRUN, 195, 262 
BSAVE, 194,219, 262-63 
verificando, 245 

CALL, 103, 256, 263. Veja tamb6m USR 
Caracteres de entrada, 14 
applesoft, 14 
integer BASIC, 14 
monitor, 14 

Carregamento de programa 
cassette, 27-28 
disco, 28 

Carregando o DOS, 20-25, 46-47 
applesoft, 165 

CTRL-K, CTRL-P, carregando no Monitor, 165 
ini'cio autom^tico, 164 
integer BASIC, 165 
salto a partir do Monitor, 164 
Carregando programas. Veja Carregamento de pro- 
gramas 

Carriage return, 90 

como parte de cordao, 121 
Cartao controlador de disco, 7, 164 
Cartao de interface de comunicapao, 7 
Cartao de interface de impressora paralela, 7, 146 
Cartao integer BASIC, 7 
Cartoes. Veja Cartoes de circuito 
Cartoes de circuito 

cartao de interface de impressora paralela, 7 
cartao de interface de impressora serial, 7 
cartao integer BASIC, 7 
Cartao Language System, 7, 13 
Cartoes Applesoft Firmware, 7 
Cartoes de controle, 6, 7, 104-105 
cartoes de interface de comunicapao, 7 
principal, 3 

Cartoes de interface, 104-05 
Cassettes 

com som, 226 

guardando arranjos no, 149-150 
guardando memdria no, 237-38 
guardando programas no, 45-46 
lendo memdria a partir do, 238-39 
manuseio, 18 

protepao contra gravapao, 19 
tons de referenda, 238 


CATALOG, 24-25, 166, 167, 263 
CHAIN, 264 

CHR$, 120-121, 148, 309-10 
Chaves de software, 204, 337-38 
CLEAR, 76, 264 
CLOSE, 176-177, 181, 140, 265 
CLR, 76, 154, 264-65 
Codigos, 355 
Colepao de lixo, 348 
Color =, 265-66 
Comando DOS nulo, 180 
Compondo linhas de programa, 151 
Comprimento de linha, 147-148 
ajustando impressao, 147-148 
CON, 94, 154, 266 
Concatenapao, 66 
Condicionais, 280 
CONT, 94, 266-67 
Constantes, 150-51 
Contador de posipao, 250-54, 257 
Controladores de jogo, 9, 209, 348 
operapao, 102 

posipoes de PEEK e POKE, 338-39 
sensores, 102 
Cor, 199 

complemento, 221 
Cordao nulo, 57 
Cordoes 

comparapao, 69 
concatenapao, 66 
cordao nulo, 57 
vari£veis, 60, 61 

Corte de permissao de escrita, 161 
Corte de proibipao de escrita, 161 
COS, 310 
CTRL, 16 

CTRL-B, 14, 26, 47, 231 

CTRL-C, 28, 33, 44, 95, 191,230, 231 

CTRL-E, 234, 236-37 

CTRL-K, 164-65 

CTRL-P, 164-65, 245 

carregamentos no Monitor, 22 
CTRL-S, 44, 233 
CTRL-X, 16, 31,48 
CTRL-Y, 246 
Cursor 

controle, 117-18 
definipao, 13 

determinapao da posipao horizontal, 116 
determinapao da posipao vertical, 117 
efeitos especiais de vi'deo, 117-25 
movimentapao, 51-52 
posicionamento, 117-18 

Data (Dado), 56-58, 76, 154, 267 
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Declarapoes de atribuipao, 75 
Declarapdes PRINT, 89, 105, 152, 295-96 
abreviada, 37 

arquivos em disco, 177-80, 183 
comandos DOS, 104-105 
cordoes, 106-07, 112-13 
formatando, 114-16 
num6rico$ como cordoes, 144 
pontos e vi'rgulas em, 106-10 
SPC em, 115 
TAB em, 115 
vi'rgulas em, 111-13, 140 
DEF FN. Veja tamb6m FN, 154, 267 
DEL, 154, 268 
DELETE, 172-73, 178, 268 
Depurapao de programas, 152 
Dfgito de verificapao, 174, 238-39 
DIM, 77, 269-70 
Discos rfgidos, 155 
Discos. Veja tamb6m Disquettes 
buffer, 164 
carregamento, 165-66 
carregando imagem binSrio, 240-41 
catalogo, 24-25 
com som, 225 
diret6rio, 164, 166 
eliminando programas do, 172-73 
floppy, 156 

inicializapao, 25-26, 162, 170-72 
lista de trilha / setor, 162-63 
LOAD, 168-69 
mini-, 156 
panes, 164 

processos de armazenamento, 164 
processos de armazenamento de dados, 158 
rfgidos, 154 
RUN, 168 
setores, 159 
tabela de.formas, 219 
trilhas, 159 
viagens, 170-72 
volume, 169-70 
winchester, 157 
Disk 11,4-5, 20, 155 
Dispositivos perif6ricos 
entrada pelos, 104-05 
safda para os, 104-05 

Diskette System Master, 20, 22, 24-25, 27, 161, 
166 

Disquettes. Veja tamb6m Drives de disco, discos DOS 
buraco de fndice, 160 
Diskette System Master, 20, 22, 24, 25, 27 
inserpao, 20 
manuseio, 20 


protepao contra escrita, 161 
setorizados por software, 160 
DOS 

carregando, 20-24, 46-47, 165-66 
modo programado, 104, 105, 146-47 
requisitos de membria, 345-46 
versoes do, 24, 162-63, 166 
DRAW, 221, 270 
Drive de disco, 4-5, 155-64 

especificapao dos comandos de disco, 167-68 
numero de drive, 167-68 
numero de slot, 167-68 
numero mSximo permitido, 168 

Edipao 17, 31 

adicionando linhas, 48-49 
eliminando caracteres, 51 
eliminando linhas, 48 
inserindo caracteres, 51-52 
limpando atd o fim da linha, 52 
limpando at6 o fim da tela, 52 
modo edipao, 49-50 
seqiiencias ESC, 49-50 
trocando caracteres, 50-51 
trocando linhas, 49-53 
Efeitos de vfdeo especiais, 117-20 
END, 41,95, 154, 271 
Enganos. Veja Erros 
Erros 

comando do Monitor, 236 
corrigindo, 31 

corrigindo durante entrada de dados, 1-38 
ESC 17, 51,52, 53 
ESC 31,48 
Espapos em branco, 56 
Estrada de dados, 105, 121-127 
backspaces, 139-40 
corrigindo erros, 139 
dados validos, 129 
formulSrios, 134 
informapoes ao operador, 139-40 
interativa, 122-25 
marcados, 130, 134, 136, 139-40 
minimizapao de erros, 121 
organizapao, 121 
orientapao de estilo, 125-27 
permitindo mudanpas, 125-27 
procurando erros, 127-29, 131,133-34 
projetando, 129-30 
verificapao de faixa, 126-27 
EXEC, 189-92,271 
EXP, 310 

Exemplos de programa 

alta resolupao em integer BASIC, 209 
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colocapao da janela de texto, 143-44 
definipSo de firma, 215-17 
entrada de janela de texto, 120 
formuleirio de entrada de dados, 134-35 
gerapao de som, 227-28 
linha diagonal em baixa resolupao, 201 
marcador de fim de arquivo, 260-61 
programa de apresentapao, 170 
repeteco, 125 

safda de som no falante, 226 
som em linguagem assembler, 250 
validapao de entrada de dados, 131-34 
Exemplo de sub-rotinas 

cabepalno de impressao de linhas e colunas, 144 
desenho de alta resolupao em Integer BASIC, 208 
determinapao de cor em alta resolupao, 207 
entrada de dados numdricos, 126 
entrada de dois caracteres, 131 
entrando dados tipo cordao, 135-36 
limpando pSgina gr^fica de alta resolupao, 205 
manuseio de erro, 129 
mascara de entrada de dados, 130 
perguntas sim/nao, 126 
Expressoes, 65 

aritmdticas, 67, 68 
booleanas, 70 
reais, 68 
relacionais, 68 
Expressoes aritmdticas, 67 
Expressoes booleanas, 70 
Expressoes do tipo misto, 71 
Expressoes inteiras, 67 
Expressoes relacionais, 68 

FN, 311. Veja tambdm DEF FN 
FOR, 82, 83, 118, 154, 178, 272-73 
Formas 

carregando tabela de forma, 220 
definipao de fim de forma, 212 
desenhando, 221 
guardando tabela de forma, 219 
limpando, 221 

montando tabelas de forma, 210 
montando vetores por computador, 215 
mudanpas de tamanho, 221 
reserva de memdria para, 217 
rotapao, 220 
Formatando, 114 
FP, 26, 37, 273 
FRE, 151,311 
Funpoes, 96-101 

— aninhadas, 101 

— cordoes, 99 

— definidas por usuario, 100-101 


— do sistema, 100 

— num6ricas, 94-95 

Funpoes definidas por usuario, 100, 267 

GET, 93-94, 131, 154, 273-74 
ler arquivos de texto, 182 
GOSUB, 87, 154, 274-75 
GOSUB. Calculado, 87-88 
GOTO, 78-82, 275 
GOTO calculado, 79 
GR, 197,275 
Gr£ficas 

alta resolupao, 202-23 
baixa resolupao, 196-202 
janela de texto, 198 
tela cheia, 198 
GrSficos em alta resolupao 

arquivos em disco com, 194-95 
cores, 206 

desenhando linhas, 207-08 
desenhando pontos, 207-08 
dimensoes de telas, 202 
formas, 209-23 
janela de texto, 204 
integer BASIC, 204-09 
limpando paginas em alta resolupao, 205-06 
mostrando na tela, 203-06 
paginas, 202-03 
requisitos de mem6rias, 202-03 
reservando memdrias, 202-03 
voltando ao mono texto, 205 
Greificos em baixa resolupSo 
cores, 196-97, 199 
desenhando pontos, 199 
determinando a cor da tela, 201 
dimensoes da tela, 196 
grSficos de tela cheia, 198 
janela de texto, 198 
linhas horizontais, 200 
linhas verticais, 200 
paginas, 196-98 

Gravador cassette, 18. Veja tamb6m cassettes 
ajustando o volume, 18-20 
conexao, 4 

Gravador de fita. Veja gravador cassette 

HCOLOR, 206, 276 
HGR, 203-04, 276-77 

alternativas para o, 204-05 
HGR2, 204, 277 

alternativas para o, 204-05 
HI MEN :, 103, 154, 203, 217-18, 220, 257, 277-78, 
346, 347-48 
HLIN, 200, 278 
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HOME, 279 
HPLOT, 210, 279 

aiternativas para o, 208 
HTAB, 117, 140, 280 

IF- THEN, 88, 280-81 
Impressoras 

ativando via Monitor, 246 
CHR$ com, 148 
cddigos de controle, 148 
conjunto de caracteres, 147-48 
conectando, 9-11 
formatando, 139 
largura de linhas, 147-48 
program^veis, 147-48 
selecionando para sai'da, 146 
tamanho de p^gina, 147-48 
Imprimindo cabegalho, 114-15 
Imprimindo listagem de programa, 148-49 
IN#, 165, 281 

modo programado, 104-05 
INIT, 170-72, 281 

INPUT, 91, 123-24, 130, 149, 154, 282-83 
Integer BASIC. Veja tamb^m BASIC e Programas 
acesso a partir do Monitor, 230-31 
nomes de vari£veis, 60 
numeragSo autorrtftica de linhas, 44-45 
numeros de linhas, 55 
posigbes de tabulagao no, 111 
reiniciando, 33 

trocando por Applesoft, 46-47 
uso de membria, 345-47 
valores num^ricos, 36 
Interface serial, 7, 146 
INVERSE. 118, 178, 284 

Janela de dados, 141-46 
Janela de texto, 119-20 

posigdes de PEEK e POKE, 336-37 

Language System, 22 

carregando DOS, 20-25, 165 
cartao, 7, 13, 18 
LEFTS, 311 
LEN, 312 
LET, 73, 284 
Letras maiusculas, 15-16 
Letras minusculas, 15-16 
Ligando, 12 
Linguagem assembler 

com BASIC, 103, 256-57 
depuragao, 252-255 
mini-assembler, 247-251 
programas de listagem, 251-52 


programas em disco, 184-85 
relocagao, 256-57 
sub-rotinas internas, 255-57 
Linguagens de programagao, 54-55 
dialetos, 54 
sintaxe, 54 
List, 43, 56, 284-85 
Listando. Veja Listando programas 
LOAD, 27, 154, 285-86 
LOCK, 173, 286 
LOG, 312 

LOMEN:, 103, 154, 203, 257, 286-87, 346 
LOOPS, 80-84, 272, 288 
aninhados, 81 -84 
MAN, 44-45, 154, 287 
MAX FILES, 192-93, 287-88 
Membria 

acesso direto via BASIC, 102 
alterando blocos de, 235 
alterando enderegos simples, 102, 234 
apenas de leitura (ROM), 3-4 
apontador de enderego, 232 
capacidade de, 3-4 
comparando blocos, 243 
de acesso aleatbrio (RAM), 3-4 
determinando limites, 103, 104 
enderegamento, 102 
especificando em BASIC, 102-03 
examinando palavras, 232 
guardando via BASIC, 194-95, 240 
guardando via Monitor, 237 
leitura/escrita (RAM), 3-4 
locagao, 257 

movimento de blocos, 195-242 
mapas, 345-48 

preenchendo com um padrao, 240-41,242 
recuperando via Monitor, 238-39 
verificando gravagao, 244 
Membria apenas de leitura. Veja Membria 
Membria de leitura/gravagao. Veja Membria 
Mensagem de apresentagao, 93-94, 125-27 
Mensagens de erro, 30, 38, 323-327 
Ml D$, 312 

Mini- assembler, 246-51 
acessando, 247 
comandos do Monitor, 247 
contador de posig§o, 248-49 
formato de instrugao, 148-49 
saindo do, 248 
segao de exemplos, 250-51 
MOD, 68 

Modo calculador. Veja Modo imediato 
Modo definido. Veja Modo programado 
Modo direto. Veja Modo imediato 
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Modo edipao, 49-50 
Modo imediato, 35, 154, 258 
Modo indireto. Veja Modo programado 
Modo programado, 35, 40, 258 

comandos DOS, 105 -op 145-47, 174-75 
restripoes, 154 

Modo texto, desenho em, 293 
Modos de enderepamento, linguagem assembler, 248 
Modulador de RF,2, 12 
MON, 193, 288 
Monitor, 14, 229-48, 251-256 
acessando, 229 

alterapao de registradores, 236-37 
apontador de enderepo, 233-35, 244 
Autostart Monitor, 22, 230 
com som, 224 

comando definido por usuario, 247 
comando de listar, 251-52 
comando de passo, 251-253, 255 
comando GO, 231,245 
comando trace, 253 
comandos, 236 
contador de posipao, 251-52 
definipoes, 5-6 
exame de registradores, 233 
guardando memdria, 237 
ler memoria, 238-39 
monitor padrcfo, 229 
mover memdria, 240-41 
procedimento para encher memdria, 241 
processo de verificapao de memdria gravado, 
244-45 

sub-rotinas internas, 255-257, 328 
safdo do, 230 

selepao de dispositivo de entrada, 246 
selepao de dispositivo de safda, 246 
verificar memdria, 241-44 
vi'deo reverso, 246 
Monitor Autostart,, Veja Monitor 
Monitor de linguagem de maquina. Veja Monitor 
Monitor em linguagem assembler. Veja Monitor 

NEXT, 81, 154, 288-89 

NEW, 41, 154, 288 

NO DSP, 153, 289 

NO TRACE, 152, 290 

NOMON, 193-94, 289-90 

NORMAL, 118, 290 

Notapao cientffica, 58-59 

Numerapao automatica de linhas, 44-45 

Numero de slot, 3, 6, 7, 146, 168-69 

especificando em comandos de disco, 168 
selecionando, 105-06 
Numero de volume, 169-72 


Numero do drive, 168-69 
Numeros, 57-59 

em notapao cientffica, 58-59 
inteiro, 57 
reais, 58 

Numeros aleatdrios, 313 
Numeros de linha, 41-42, 54, 151 
como enderepos, 55 
Numeros hexadecimais 
aritmdtica, 246-47 
conversao para decimal, 356-362 

ON-GOSUB, 88, 291-92 
ON-GOTO, 80, 292 
ONNER GOTO, 154, 181,290-91 
negando, 128 

rotina de manipulapao de erros, 128 
rotina em linguagem de m^quinas para, 291-92 
OPEN. Veja tambdm APPEND, 176, 185, 292 
Operadores 

aritmdticos, 65 
booleanos, 65 
corddes, 65 
precedencia de, 65 
relacionais, 65 
Operadores Idgicos, 70 
Operadores relacionais, 68 

Paddles. Veja Controle de jogo 

Palavras reservadas, 63 

Panes em disco rfgido, 163 

Panes em disco setorizados por software, 163 

Parada de tubulapao, 111-12 

Parenteses, 66 

PDL, 312-13 

PEEK, 103, 

determinando coluna do cursor, 116 
determinando linha do cursor, 117 
posipoes uteis, 335 
Plot, 199, 293 

em modo texto, 293 
POKE, 103, 257,294 
com formas, 218, 220 
com grSficos, 198, 204-05 
janela de texto, 119-20 
posipSes uteis, 335 
Ponto e vfrgula, 106-110, 140 
em arquivos de disco, 183 
separando variaveis, 90 
POP, 86, 134, 294-95 
POS, 116, 313 
PR#, 146, 148-49, 165, 295 
modo programado, 104-05 


374 


fNDICE ANALITICO 


Precwdencia, 65-66 
sobrepassando, 66 

Programa de apresentapao, 26, 170, 174 

Programas 

adicionando linhas, 43, 48-49 
compactos, 150 
declarapoes, 38 
depurapao, 151-52 
destravando, 173 
eliminando do disco, 172-73 
eliminando linhas, 48 
entrando espapos em branco, 56 
execupao, 41 
finalizando, 41 

guardando em cassettes, 45-46 
largura de linhas, 36*43 
linhas de multiplas declarapdes, 43, 150 
mais rdpidos, 149-50 
numeros de linhas, 41 
otimizapao, 149-51 
rebatizando, 173 
sequSncia de linhas, 41-43, 55-56 
trocando linhas, 49-53 
trovados, 173 
verificando, 175 

Programas em linguagem de mSquina, 247-57 
Veja tamb6m Linguagem Assembler 


RAM, Veja Memoria 
READ, 74, 180-82, 184-85, 189 
arquivo EXEC, 189-90 
declarapao de atribuipao, 297 
declarapao de disco, 296-97 
RECALL, 149-50 

Recdpia. Veja Tecla de flexa para a direita 
Recurs§o, 86 

Registrador Apontador de Pilha, 234, 236-37 
Registrador fndice X, 234, 236-37 
Registrador fndice Y, 234, 236-37 
Registradores, 256 
alterando, 236-37 
examinando, 233 
REM, 73, 151,298-99 
RENAME, 173-74, 299 
RequisipSo, declarapao INPUT, 93 
REPT, 17, 31,48, 53 
RESET, 15, 16, 33, 95,253 
acidental, 16, 31-33 
recuperapao por, 33 
RESTORE, 76, 299 
RESUME, 128, 154, 299-300 
RETURN, 154, 300 
RIGHTS, 313-14 


ROM . Veja Memdria 
ROT, 231,300 
RND, 314 
RUN 

declarapao de disco, 301 
declarapao geral, 28, 123, 154, 301 

Sa Idas 

alinhando valores num6ricos, 144 
arranjos, 141 
formatando, 140 

Safdas de programa, 105-21, 139-49 

Salto, 36, 145 

Saltos 

comandos do Monitor, 245 
declarapoes BASIC, 78-80 
SAVE, 154, 172, 301-02 
SCALE, 221-22, 302 
SCRN, 201, 314-15 
Setores, 159 
hard, 160 
locapao, 160 
SGN, 315 
SHIFT, 16 

SHLOAD, 219-20, 302 
SIN, 315 

Sinai de aspas, com parte de cordao, 121 
Sistema Operacional em Disco. Veja DOS 
Som, 223-28 

com linguagem de mSquina, 224, 226 
SPC, 115, 315-16 
SPEED, 118, 303 
SQR, 316 
STOP, 95, 303 
STORE, 149-50, 304 
STR$, 316 
Sub-rotinas 

aninhadas, 86-87 
chamando BASIC, 274, 292 
chamando programa assembler, 263, 317 
entrada de dados, 125-27 
internas, 328-34 
safda com GOTO, 134 
Sub-rotinas intrfnsecas, 328-34 

TAB 

declarapao, 117, 140, 304 
funpao PRINT, 115, 316-17 
Tabela gr^fica, 11 
Tabela verdade, 70 
Tabelas de forma, 210 
apontando para, 220 
carregando, 220 
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codificando bytes, 211-13 
definipao de fim de forma, 212 
diretdrio, 213 
entrando, 217-19 
guardando, 219 
tamanho, 213 
vetor de desenho zero, 212 
TAN, 317 
Teclado, 1,15 

desativando via Monitor, 246 
Tecla de flexa para a direita, 17, 31,49, 51 -53 
Tecla Escape. Veja ESC 
Tecla flexa para a esquerda, 17, 31,53 
Teclas de controle. Veja CTRL 
Teclas de flexa, 17, 31 
Tdcnicas de visualizapao, 142 
Tela de TV, 1 
Tela de vi'deo 

ajustando a largura, 49-50 
ajuste de cor, 28-30 
aparelho de televisao, 1,2 
chaves de software, 337-38 
conex5es, 2 

determinando a cor da tela, 201 
dimensoes da, 2 
evitando a ultima coluna, 144 
formas em alta resol upao, 209-23 
formatando, 139 

graficos em alta resol upao, 202-09 

ySficos em baixa resolupao, 196-202 

grSficos em tela cheia, 198 

janela de dados, 141-46 

limpando, 117 

listando programas, 44 

modo texto, 198 

modo vi'deo reverso, 118, 246 

monitor de televisao, 1,2 

80 colunas, 9, 13 

operando com, 36, 145 

piscando, 124 

projeto, 140 

velocidade, 118 

Teste de programa. Veja Depurapao de Programa 
TEXT, 304 
TRACE, 152, 305 
com DOS, 194 


Trilhas, 158-59 
locapao, 160 
Truncagem, 72 
Tipos de programas 

— aplicapao, 5 

— interpretadores, 5 
— Monitor, 6 

— saudapao, 25, 170 

UNLOCK, 173, 305 
USR, 257, 321 

VAL, 317-18 

Valores numdricos, impressos como cordoes, 144 
Varidveis, 150-51 

atribuindo valores, 122-24 

corddes, 60-61 

formato na memdria, 345-46 

inteiros, 61 

nomes, 59, 63 

numdricos, 61 

rascunho, 151 

reais, 62 

Varidveis de fndice, 80-81 
Varidveis de rascunho, 151 
Varidveis numdricas, 61 
Varidveis reais, 62 
Vetores 

desenho, 210-13 
fantasmas, 210 
Vetores de desenho, 210 
cddigos, 211 

montando vetores por computador, 215 
Vetores fantasmas, 210 
VERIFY, 174, 305-06 
Vi'deo reverso, 118, 246 
Vi'rgulas, 111-15, 140 

em arquivo de dados, 181-84 
separando varidveis, 89 
Vlin, 306 

Vtab, 117, 140, 306 
WAIT, 306-07 

WRITE, 177-80, 184-85, 189, 307-08 


XDRAW, 221,308 
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